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Kapitel 1 Vae bedeutet schon Anpaseung ... 


Der größte Vorteil von CP/M ist sicherlich seine Flexibilität in 
der Anpassung an vorhandene Hardware. Aber genau darin liegt auch 
ein evtl. entscheidender Nachteil. 


Ist es auf der einen Seite möglich, so gut wie jedes Terminal, 
jedes Video-Display oder jede Grafikkarte mit entsprechenden 
Treibern anzuschließen (genau so wie jede Serienschnittstelle 
oder jeden Drucker) so können auf der anderen Seite eben diese 
Geräte auch in ihren Möglichkeiten völlig verschieden sein. 


Ein CP/M-Programm, das als Konsolenausgang z.B. ein Terminal mit 
Cursor-Adressierung verlangt, kann kaum in einem System rei- 
bungslos funktionieren, das mit einer einfachen Videokarte ausge- 
rüstet ist, die eben keine Cursor-Adressierung hat. Ebenso nützt 
ein wunderhübsches Grafik-Programm einem Anwender ohne der pas- 
senden Hardware gar nichts. 


Hier ist vor allem der Grund zu suchen, daß es unter CP/N so gut 
wie keine Bildschirmspiele gibt, wie diese doch auf jedem 
Billigstcomputer - auch noch in Farbe - ablaufen. Sicherlich 
sind derartige Programme möglich, eine kompatible Hardware vor- 
ausgesetzt, aber genau diese Art von Programmen ist und soll 
auch nicht die Domäne von CP/M sein. 


Unter CP/N gibt es ein Vielzahl guter Programme in allen Preis- 
lagen, die es dem Benutzer möglich machen, alle Computeraufgaben 
zu lösen zu deren Zweck eine CP/M-Maschine erstanden wurde. 
Dieser 'Zweck' liegt meist in Textverarbeitungs- und Buchhal- 
tungsaufgaben, aber auch in der Programmierung von Steuerungen 
der verschiedensten Art. 


Bevor eine CP/M-Maschine funktioniert, sind aber die unterschied- 
lichsten Hardware-Voraussetzungen an das CP/M anzupassen und ein 
Hilfsprogramm bereitzustellen, das den Kaltstart (also das Booten 
einer CP/M-Systemdiskette) ermöglicht. 


Es ist dabei zu berücksichtigen, welche Konsolenschnittstelle zur 
Verfügung steht, welche Schnittstelle zu den Diskettenlaufwerke 
und um welche Laufwerkstypen es sich dabei handelt. Diese Hard- 
ware-Anpassung wird in einem Programteil des CP/M mit dem Namen 
BIOS «(Basic Input Output System - Grundsystem für Ein- und Aus- 
gabe) vorgenommen. 


Alle notwendigen Anpassungen sind in den nachfolgenden Kapiteln 
erläutert und an Beispielen verdeutlicht. 


Da die Hardware, wie bereits angedeutet, in einer CP/N-Umgebung 
sehr unterschiedlich ist, mußte eine bestimmte Konfiguration als 
Beispiel herangezogen werden, um auch eine wirklich funktio- 
nierende Software zeigen zu können, denn sonst wären nur 
'Spielbeispiele' entstanden. 


Ausgewählt wurde zu diesem Zweck der NDR-Klein-Computer mit einer 
2Z80-CPU, einem Grafikinterface (oder einer Serienschnittstelle zu 
einem Terminal) und dem Kontrollerbaustein Fb 1793 zur Disketten- 
bearbeitung. 


Die Auswahl fiel deshalb auf das genannte Gerät, weil alle Unter- 
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lagen, wie Schaltpläne und Beschreibungen zu erhalten sind. Auch 
können alle benötigten Baugruppen in Form von Platinen, Bausätzen 
oder Fertiggeräten preisgünstig bezogen werden. 


Alle benötigten Baugruppen sind typisch für einen CP/M-Computer, 
so daß die besprochene Software relativ einfach auf andere 
Computer übernommen bzw angepaßt werden kann. 


Alle Assemblerlistings wurden mit dem Macro-Assenbler ZEOASM 
erstellt, der weitgehend kompatibel zum Macro-Assembler M8Ö von 
Nicrosoft ist. Der Z80ASM hat jedoch den Vorteil erheblich 
schneller, flexibler und preisgünstiger zu sein. 


Die Programme wie auch alle anderen Beispiele wurden mit Z80- 
Mnemonics geschrieben. 


Kapitel 2 Nach dem Kinschalten ... 


Jeder Computer benötigt sofort nach dem Einschalten Anweisungen 
was er nun tun soll. Diese Anweisungen erhält er normalerweise 
von einem Monitorprogramm, das der Lieferant des Computers zur 
Verfügung stellt. 


Dieses Programm ist üblicherweise in einem EPRON (oder PROM), 
dessen Inhalt der CPU sofort nach dem Start als Anweisung dient. 


Es soll nicht Aufgabe dieses Buches sein, Monitorprogramme zu 
beschreiben und zu analysieren. An dieser Stelle sei nur ihr 
'Lebenszweck’ definiert. 


Ein Monitorprogramm muß in einer CP/N-Maschine folgende Funk- 
tionen erfüllen können: 


1. Nach dem Einschalten muß zumindest die Konsole (Ein- und 
Ausgabe) initialisiert werden. 


2. Ein Speichertest ist von Nutzen falls unterschiedliche 
Speichergrößen möglich sind. 


3. Das Gerät sollte melden, daß es für weitere Tätigkeiten 
bereit ist. 


4. Der Monitor kann nun eine Vielzahl von Hilfsfunktionen zur 
Verfügung stellen oder auch nur eine kleine Auswahl von 
Sprungmöglichkeiten in andere Speicherbereich oder eben die 
Möglichkeit eine CP/M Diskette zu booten. 


Es gibt Geräte, die anstelle des Nonitorprogramnes ein Programm 
eingebunden haben, das sofort nach dem Einschalten versucht die 
Diskette in Laufwerk A zu booten. In diesem Falle muß alle Ini- 
tialisierung, soweit nicht doch schon vorher geschehen, vom 
LDRBlOS oder BIOS übernommen werden. 


Gleichgültig wie das Gundprogramm aussieht um CP/N 3 booten zu 
können, ist eine von zwei Möglichkeiten gegeben: 


L. Sektor 1 auf Track ® der Boot-Diskette wird (egal wie), 
z.B. nach Adresse ®00®H in Bank ® gelesen und danach diese 
Adresse angesprungen (d.h. dieses Programm wird ausgeführt). 


2. Es wird der CPN-Lader nach Adresse 100H Bank ® direkt 
geladen. Die Information, wo sich dieser Lader befindet, muß 
dem Boot-Programm bekannt sein. 


Beide Arten des Bootens müssen die Möglichkeit bieten Boot- 
Fehler zu melden, im Sinne von: "Lesefehler” oder "Diskette nicht 
vorhanden”. 


Im ersten Fall werden, je nach physikalischer Sektorgröße, bis zu 
lk-Byte gelesen. In diesem gelesenen Programm kann nun eine 
weitere Initialisierung vorgenommen werden. Aber die Hauptaufgabe 
des geladenen Programmes ist es, das zu tun, was im zweiten Fall 
getan würde, es wird der eigentliche Lader (CPMLDR) nach Adresse 
100H in Bank ® geladen. 


Man fragt sich unwillkürlich, wozu dieser umständliche Weg im 
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ersten Fall gut sei, nun: Ein derartiger Booter kann unter- 
schiedliche Betriebsysteme z.B. CP/M 2 und CP/M 3 laden und dazu 
vielleicht auch noch ein UCSb-Pascal System oder ein FORTH- 
System. Alle Informationen hierzu würden sich immer im ersten 
Sektor einer Diskette befinden, Der zweite Fall kann hier nicht 
(so ohne weiteres) benutzt werden, da die Größe (Länge) des zu 
ladenden Programmes sehr unterschiedlich sein kann. 


Das nachfolgende Listing zeigt einen (sehr) einfachen Bootlader 
wie er z.B. beim NDk-Klein-Computer eingesetzt werden könnte. 


(Es stehen dafür jedoch 'richtige' Monitorprogramme zur Ver- 
fügung) 


! ; RRIRKIRKHKERKERRKRKSKKSKKKHRRKH HH EÄK KA RER RIEF REIS IHRE IH EHER REF ECE 
2 ‚+ + 
3 sk ML Enat-Lager x 
4 kt ReV 1.6 EELJEU] x 
5 2 | x 
6 ; % Aufgabe aıeses Programmes ist es Sertor ] Track # eıner x 
7 ; % 5.25“ Gıskette in Lautwerk A nacn Ayresse & zu lasen ung x 
3 ‚ % dort auszufuehren x 
E] x x 
IL) ; RRRSERRREKKRSRRRRIH RS KH RRKTR RL KLERÄRSHÄRSRRÄRRSKRRRSLRRIRERRRKEK 
ii) 

12 [u] org # 

13 

1a um F3 bat: a ; kaıne Interrupts 

15 0a 21 Ib} hi,#start ; nun Programmteil | transferieren 
16 ma 11 FCad la ge, Atem ; Zieladresse 

17 07 al Mh id be,*len ‚ Transferiaenge 

12 0m ED Er lcır 

19 nl 03 FCA ip at ch und dıeses Programmsegsent anspringen 
u 

2 uunz start eau $ ; Transtersegeent Start 

Z 

23 .phase #tciöh ; Ausfuehrungsadresse 

24 

25 FCaa 31 aaa ld sp, ; setzte eigene Stack 

FC EM Ib} a, ‚ Eank @ und Eootkarte senliessen 
27 cas 0308 aut, (aCSH),a ‚ EPRÜM zu RAM eingeschaltet 

23 

2 i 

» ; gas System hat, Jetzt G4k RAM ın Bank @ und gas ERRÜM 

3 ‚ aer Bank Bootkarte ıst abgeschaltet, 

32 ; 

3 

34 FC07 & la a, dio ; Betehl force interrupt 

35 FC#9 03 08 out (ACHH) ‚a ‚ an Jen FDC Kontrolier zum RESET 
2% FC 1a FE dinz $ ; kurz warten ( <B> war MAL nach DINZI 
37 FC 21 14 a, dein ; select code MiNIS Laufwerk A 

3 FC 03.04 aut (RCAN) ‚a ; ausgeben 

3IFCH IAFE dınz $ ‚ nochmals kurz warten 

4 Fc3 & 09 14 a, ; home Eetenl mit 6 ns 

al FCIS 03 C9 out (Can ,a ‚ an FiC Kontroller 

42 FCIT EI ex (sp) ,nl ı ca Z# ys warten 

43 FC13 E3 ex (sp),hi 

44 FCI9 E3 ex (sp) ,hl 

45 FCIA E3 ex {sp),hl 


ann Status anfragen 





An rin ie busy:  ın a, ; 
or 


AT FCHO rrca ı Sıt 7 ırs Carry 

4 Flirt SFR ır c,ausy ; nıcnt bereit solange Eıt 7=i 
43 

5 : 

5i ‘In grasen Treiber wırd nun 'unenziien’ oft gelesen 
2 ; solange nıs es klapet. 

53 ; 

54 

Erg le u le WEN ‚ Agresse ges Üatenregisters jagen 
Sk FÜ2Z Ar rerryı wor a ı Aal 

STE GE ut (Kin).a ; ıns Trackragister (Trackah) 
BE K inc a "del 


[0 cut Ur) a { ıns Sektorregister (Sektor 1ı 





Ba Fa 21 Wo la 1,9 ı Zieladresse 

FRE EN Ib} a, el un ; Beten] Sertor lesen 

k2 FC 0306 aut (bcön),a ı an zen Fil-kontroiler 

63 rt E3 ex (sp),nl 

BA FC EI ex (sp) ,hi 

65 Fl 63 ax isp),n] 

Br E3 ex (sp).hı ı Mus warten 

ETF iR a imp'  ın 2, luck ‚ Status einlesen 

ES FCSS CB AF pıt i.a ; In? daten iregen bereit?) 
3 FT 2 jr z,Impi ; wenn nıcht, sonst 

70 FC39 ED A2 ım ı Gatan einlesen 

NFC 03 FÜR H) loop } jeoes Zeichen einzeln 
n? 

T3FCK (E47 imel! ht #,a ; fertız ? 

74 Fidu C2 FC33 p rz, ienp ‘wenn nıcnt 

75 CA En El and eiillao ; sonst Fenler maskieren 
Mm FCS 0 ir nz, retry ı wenn faiscn geiasen nochmal 
7 

2 

79  hierhrer wenn Sektor fanierfrei geiesen wurge 

Bi) i 

3] 

SZ FLAT CE un ıp { ‚ Frogramm austuehren 

23 

84 Jepnase 

35 

& aaa *len ea $-Astart, 

7 

gs end 
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Kapitel 3 Der Track-0-Lader 


Das vom Boot-Lader geladene Programnsegment 'Track-®-Lader' hat 
die alleinige Aufgabe (zumindest in dieser Zusammenstellung) das 
CP/M Boot-System, den sog. CPM-Lader (CPMLDRK) in den Arbeitsbe- 
reich des Computers (ab Adresse 100H ) zu laden. 


Dieser Track-®-Lader ist nun bereits CP/M 3 typisch, könnte für 
CP/M 2 jedoch ähnlich aussehen (dort muß jedoch auch aus Track 1 


und evtl. noch Track 2 geladen werden) und für ein FORTH-Systen 
wiederum ganz anders. 


Die Entscheidung, wie-was-wo gemacht wird, liegt meist in der 
Hand des System-Programmierers (das ist der, der Betriebssysteme 
wie CP/N in einem Computer zum 'laufen' bringt, d.h. die Hard- 


ware-Anpassung vornimmt - oder auch ein neues Betriebssystem 
schreibt). 


Im Falle des NDR-Klein-Computers entspricht der Track-®-Lader dem 
nachfolgenden Listing. Auf eines sei bei dieser Gelegenheit hin- 
gewiesen: in der Zusammenstellung mit CP/N 3 gibt es einen spe- 


ziellen Boot-NMonitor mit einem Hardware-angepaßten Ein- Ausgabe- 
Teil ab Adresse FCOOH. 


Aus systemspezifischen Gründen (vor allem des Konsolentreibers 
wegen, der mit rund 4K sonst zu Buche schlagen würde) werden 
Routinen aus diesem Programmsegment, das immer resident bleibt, 
in allen Lader- und BlOS-Programmen mit verwendet. Ein Listing 
dieses Monitorsegmentes ist in Teil VI ausgedruckt, um entsprech- 
ende Aufrufe 'verfolgen’ zu können, 


MKCLIB DEFAULT. IMG 


\ 

2 ‚ Adxapgphgtphtepststsgcäsgeggnhhkgherkerrengehgeeteprerttgrereehe 
3 ix x 
4 ı % Track-#-Lacer fuer MR-LOREIGS CP/m 3 x 
5 ; x 
5 ; % Dieser Lader wırd vom EÜÖT-Lader nach SECSEG geladen (Finn) & 
7  % und sort ausgefuehrt. x 
&  * Im Programe lagen zu koennen, gıe diesen Beeıch veberladen & 
$) ı * ıst es motwendig den eigentlichen Laner nach Adresse bum- 4 
in ; & zulaoen. x e 
1 Di | x 
12 ; % Geschrieben von RAUK d. KÜEREER, Detmold xt 
13 8 x 
14 ı KRREREERRIEIEREKRFRKSKRERERKRRKERR RER HISRRRSFRRRER FH RRSc KK H RT 
15 

16 ‚phase Ati ; Putfer unter ELMON 

17 

18 Fon 21 FC, id hl,getit ; Transter nacn Ayresse # 

19 Fa03 11 Ooae ld Je,d ; ges geladenen Sektors 

zu Fon: a1 Ana id bc,ien 

21 FoR9 ED BA Lie 

22 Foab (7 rst [} 

23 FoRXC tıt em $ 

24 
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ET 
23 03 21 Fosh 
2 en 
a or ee 
22 Abs EB 
it A 
nor 
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wre: 


trki! 


erfig! 


error, 


ien 


call  erlapey 
cali  nz.error 


ap hi 

la 2e,4u0h 
a2d hi,ce 
Pr 22 

pop be 

Inc E 

Ib] 2,2 

cp 6 

jr c,teel 
i9 a,tarfigs 
or a 

Ip z, i@yn 
sch 

IP af an 
b.) [1 

push ni 

14 hi,erfig 
inc {nl) 
pop hi 

rat. 

em $-trka 
„gephase 

end 





aartnın 


u 


nascrsten 7 Sektoren 


' neue ÜM-Agresse nach 4L 
ı lesen von Laufwerk 'A’ 


an Sertar 2 


naecnsten Sektor jesen 
um 

+ix 

gıat neue [md-Agresse 
Sektarti 


turen geiagen? 





5 
; weiter wenn nicht 


‘ Fenier aufgetretan? 


wenn nıcnt 


zuruerk ın Monitor 


Kapitel 4 Der CPN-Lader (CPNLDK) 


Dieses Programmsegment von CP/M 3 hat nur eine einzige Aufgabe, 
die Datei CPNM3.SYS zu laden und auf die richtigen Adressen in 
Bank ® (dem gebankten Bereich von CP/M 3) und in den sog. ge- 
meinsamen (Common) Bereich (von E®0®. .FFEF) zu verteilen. 


Man muß sich die genannte Speicheraufteilung so vorstellen, daß, 
solange Bank ® eingeschaltet ist, das komplette CP/N nit LOADER, 
BDOS und BIlOS in einer Speichereben vorliegt, da auf den genein- 


samen Bereich ja eben von allen Banken aus zugegriffen werden 
kann. 


Diese Speicher-Konfiguration liegt immer dann vor (vom BVOS er- 
zwungen!), wenn ein BDOS-Aufruf Programnteile benötigt, die im 
gebankten Teil (Bank ®) angesiedelt sind. Dies trifft (vom BVOS 
aus gesehen) auch auf den gebankten Teil des BIOS zu. 


Der CPM-Lader wird von Track-®-Lader nach Bank ® Adresse 10H 
geladen und angesprungen. Vom Prinzip her ist der CPN-Lader ein 
'normales’ CP/M nit Sonderaufgaben. (Es 'weiß’, wie die Datei 
CPN3.SYS - das eigentliche CP/N3 - zu verteilen ist, kann aber 
keine Dateien auf Diskette schreiben, weiß auch nichts mit Uhr- 
zeit und Bankumschaltung anzufangen). 


Dieser CPN-Lader besteht nun - um die Sache recht kompliziert 
erscheinen zu lassen - wiederum aus zwei Teilen, dem Hardware- 
unabhängigen BVOS-Teil (Basic Disk Operating System - den grund- 


legenden Disketten Betriebssystem) und der Hardware-Anpassung, 
dem Lader-Bl0S. 


Das BIOS kann recht einfach aufgebaut sein, da nur wenige Funk- 
tionen benötigt werden, es entspricht im übrigen jedoch einem 
'normalen'’ BIOS wie das nachfolgende Listing zeigt. 


Die Einzelheiten des LDRBIOS-Listing sollen an dieser Stelle 
unbesprochen bleiben. Alle (notwendigen) Einzelheiten werden bei 
der Besprechung der Segmente des kompletten BIOS erklärt. 


Zur Generierung des gesamten CPN-Laders wird der BDOS-Anteil von 
Digital Research als REL-Datei CPMLDR.REL mitgeliefert. (Lader) 
BLOS, «Lader)BlOS und Track-0-Lader werden nun wie auf der fol- 
genden Seite gezeigt, zusammengebunden. 


Die abgespeicherte Datei wird mit dem Index .BIN versehen, zur 
Erkennung, daß das Programm zwar BlNär ist, aber nicht als COM- 


Programm ablauffähig ist, da der Track-®-Lader in diesem Falle 
bei Adresse ® beginnt. 


Diese Datei muß nun mit einen Hilfsprogramm auf Track ® ab Sektor 
1 geschrieben werden. Hierzu gibt es die unterschiedlichsten 
Hilfsmittel mit den unterschiedlichsten Möglichkeiten. Das Mo- 
nitorprogramm ELNON für den NDR-Klein-Computer bietet hierzu 
hervorragende Unterstützung. Zur Generierung der Programme ist 
Jedoch der Zugriff auf ein beliebiges CP/M-Systen erforderlich - 
hier beißt sich dann eben doch die Katze in den Schwanz. 
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AnSd =trackd ‘ assemnlieren oes Track#-Lagers 





Arns% =arbıas ( assenbileren Jes Ladter-Eios 

Aylınk track&lläim) .  * lınken ces Track-W# Lagers aut Adresse dran 
Arlınk cpaidrliiänlscenlar,larbıos © lınken nes (FM-Lauers mıt dem EiiS 
Asıq trackd com < lagen cas Track#-Lasers aıt Siu 

{P/m 3 Sid - Version 3.4 X so melget sıch SID 

NEXT MSZE FÜ END 

ala ei ie CHF < Start bei iiam benurzter Speicrer oıs TG 
E>107} < inhalt uenerpruefen ımump ab Inin) 

a ZT el ze re 
een hl... 
NEO ZEAAMETNT AI IE TE. Ad 

MM FERBERHEMET AM IT IM 3.1 7 

aa ER EICH IA TA TA TA IA TA TA IA IA 12. 

W150: IA 1A 1A IA IA TA IA IA IA iA TA IA IA 1A IA iA. 

Bea: 1A TA 1A 1A 1A 1A 1A 1A 1A 1A 1A IA TA IA IA IA. 

#179: 1A NA IA iA 1A 1A IA iA IA IA IA TA TA IA TA IA. 

als: a3 5A ZF AU 20 32 2 53 49 Ad 20 ZUM 56 65 72 (Pe 3 SID - Ver 


[EUR rer ES He 
MA A EC ZT RETTET IE... ek 
ler ei CHE tx . Ri 


rcpnlar.con, iu © Jagen von CPMLÜR.COM nach Agresse ISum 
NEXT MSZE FC END 

A a SER < Frogrammenge nei [En 

kaidı < inhait ueberpryefen 

Ba 2 RC Feel... ! 
ia FEB TA... 
Ba ES CET FE ME IT TOLL IE TE... { 
Bi FED BEA A 33 m B7 CA 37 CH FA. 7 

ade ES 2 EM MEI CI IA IA 1A IA 1A TA TA TA IA „124 . 
#154: 1A IA IA IA A IA TA TA TA TA HA IA TA TA TA IA nn. 
wiedı TA TA 1A NA TA TA TA TA TA TA TA TA TA TA TA TA een... 
7a TA NA IA GA IA TA TA IA TA TA TA TA TA TA TA A nn. 
Bl... 
ol CO SO M2 BE BF IT ABEL CO SDHZFEFF II CF). ERDE 
alas: CARE I BR CDS CT nn... e 
9159: 21 h2 BE M& 7E 1213 23 90 C2 34 61 CD 35 Hi de “sA.. 

X Beı Adresse 1&%M beginnt nun oer CP/M-Lacer . Dles entspricht spaeter > 
x oem zweiten iogıschen Sektor (Je 128 = 36H Eytas pro Sektor ) > 
#wcplaad.bın, 180,054 X Program als cpload.bın anspeichern 
»1An recora(s) written. < Bastaetıgung nes Äbspeicherns 19 Sektoren 
#9 X Varsstart 
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— 10 COM TIN ea 


Besser 
wo CO eu 


2] 

22 

23 un" 13 One’ 
24 O3’ (3 DOSR' 
25 Que’ 13 FCie 
25 0099’ 03 FCA3 
27 

29 ac" 13 FC 
29 dor’ 3 RB” 
a [3 
31 0615’ 13 O98R’ 
32 

3a ee 
34 GB’ 13 Ost 
35 et 3 ar 
5 er 
Kl 

erh 
39 0027" 13 u082' 
au aa 13 a 
al ol’ 13 AR’ 
4 

43 7‘ 
4 
45 6" 13 oh‘ 


43 at 13 Abe 
43 00’ C3 00838’ 
5 13 A 
51 @845’ 13 0088’ 
52 

530 3 
54 @naB’ (3 @nA2’ 


EIER 


MALIB DEFAULT. IM 
MACLIB PB. inc 


L) 


Vereinbarungen 
ung Nacros 


959793 94949335343952357776479 02195947 5273534939757 2737347277777 7 
‘X LORBIOS - Lager Bıos fuer (P/M3 ung NÜR-Computer 


x 
X 


‘X Voliausbau-Z&0-CPu, 12x DRAN, FLi2, Seh-karte als Teraınal- & 


i 
ı x Systemvaraussatzung: 


ı X Anschluss oger SP und krf 


u; 


, % Autgabe 025 LöhbliS ist es, are Datei CPM2.SYS zu lagen 
X - CPM3.SYS ıst as konfigurierte Benutzerspezifiscne CPMd 
’ 


a 1 


; % Version 1.6 vom 2.1.1985 
! X geschrieben von kacul D. Koerber im Auttrage des 
> % ELEKTRÜNIKLAGEN DETMLD 


; REKKEKKRRKERFEERRKKITKRKKHRHRR FRE IHR ARTS RKIARRRTSSESIRRRR RER RR 


ROOT: 


WBOOT: 
TCONST: 
?CONIN: 


?CONO: 
LIST: 
?AUKd: 
PAUXT: 


HÖHE: 


?ALDSK: 
?STIRK: 
ISTSEC: 


?STOM! 


?READ! 


WRITE: 
ÜLISTS: 


PSCTRN: 
TCONOS: 
MAUKIS: 
TWXKOS: 


NTEL: 
TDEVIN: 
?ORTBL: 
MLTIO: 


?FLUSK: 


mV: 


; kRirkapktkkigee 
; Bıos-Sprungtaelle 
5 RRRKHRRERKRKETRT 
i 

ip boot. 

Ip error 

p econıst 
jp econın 

jp ecommit 
Ip error 

Ip error 

p error 

Ip ‚home 

IP selask 

Ip settrk 

jp setser 

Ip setgaa 

jp read 

jp error 

jp error 

JP sectrn 

Ip error 

jp error 

Ip error 

Ip error 

jp error 

ip error 

ip error 

IP error 

IP move 


kaltstart 


rehıer wenn Warmstart 


Benutze hıerzu 
MONIO aus ELMÖN 


Lautwerk aut Track # setzen 


4 
+ 
x 
x 
t 
+ 
+ 
x 
4x 


Ansprache Laufwerk ung Faraneterueberaabe 


Track setzen 
Sektor setzen 


iMA-Agresse setzen 


iesen | physikalischen Biocks 
keın Schreiben ım Lager 


Srew-Faktor vebersetzen 


Transfer von Daten 


; Rest wırd nıcht, bencetigt —— 
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59 i 

ba U RFERRIERKRKIHRR 

81 ı XUPn 

52 ; ARRÄRRRIRSRRERRR 

53 

64 ünde’ [62 NG ı Steppingrate inteins Aistms 

55 Zi 17 hin ; Laufwerksseiekt 

vr 5 et zen: sit ; Sertor Gray 

7 at Im sa) 

63 im bahn 

70 u 1) ua) 

FI GuSA’ an in Da] ; MEDIA FLAG 

72 @05C' 075’ setpn: [WW 1.2961) ; von LÜGIN setzten wenn menrer maegiıch 
ER 3) DW DD ı CHECKSUM VECTUR 

74 Gt A DM en ; ALLOC VECTOR 

75 a062’ 0063’ 2.) bindce ı DIRECTORY EUFFER CONTRÜLL BLÜCK 

76 Ga Ag ix DTAGCE ; BATA BLFFER CÖNTRÜLL BLUCK 

17 OiR6° FFFF N __AFFm ! AS TABELLE DISRBLE VO 
ER) 2 {3 ; HASM BANK 

79 

3 DIAEE: 

51 69" FF DIRBLB: DR orFn , Drive CODE 

82 ara A 3 a) 

33 BuB’ oh [8 enahaen 

84 sl’ 0 0.4 Un 

35 rd’ 00 W® a] WRITE FLA 

Se [iR hal ı SCRATEH 

37 Wurf" And in vn ; TRACK 

BE 7 A 0.) dr ; StlTor 

39 073° Hi’ In MEUFF ı BUFFER 

El) s 

% 3353770 77777777 1 

9 ; üb 

34 ı RARERRRIKRRAFIKE 

3 : 

47 875° gpntirg dp 1924,5, 169, 2942, 255,4 ; an andere Laufwerke Anpassen' 1}! 
a7 A ve re 128 Byte (iog)-Sektoren pro Track 
43 A077" a4 or A eib Proz, Pens ; Elock-shıft und Maske 

ieb 6073’ 4 A defb  ??onid ı Extent-Mmaske 

101 a07A' 0185 A of Ta ; Maxımale Elock-Anzahl 

192 0670’ HUFF A Di el} ; Maxımale DIR-Eintraege 

In} a7" FO ou A er 777, ren ; Belegungs-Vektoren 

104 650’ 0046 A Di Al >] ; Pruefsumme 

15 oaS2’ Od A cf 4 ; keservierte Tracks (System) 
IR 34 03 07 A Da e0 ı (physi-Sektor Groesse- & Snıft-Naske 
ia 

108 oe xt! skew 5,11 

199 0086’ 91 B ein  ?nwtsect] 

Ile a087' 02 [4 to  nxtsecti 

111 0088" 03 B meib  Inxtsecti 

112 a089' 94 B seid  nxtsect 

2 Bsa' 05 B efb  Inxtsecti 

i4 
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z 
on 





116 ErE7 73 3705733577 
117 ; Lagerstart 
118 ‚ tarktrarkhreieht 
119 ; 
\2 
Tz1 me mat 
122 
123 ; 
124 ‚ hier kann [FM-Tyeiscne initialisıerung erfolgen 
125 I gie vom Bontprogramm (ELMNI nıcht gurchgetuenrt, 
12 wird, vom CAM-Laner jenoch benzetiat wıra 

i 

error! ret ; vorl nients 

131 init‘ seldsk! 
132 
133 ; 
134 \ Es wird ae Adresse ces ILFH'S gas genamteten Lautwerkes 


‚ In inL> zurueckerwartet 


; nachfolgenge Daten wergen vorlaeutıg nur ınitialısıort 
‚ ozw abgeieat. Artıan arfolat erst neim artıvan Lesen 
i 








Var a a name: 14 be, \.. entspricht Tracın 
147 
148 
143 093" ED 43 MiAk’ settrki la (Atrk),be ; Track Kummer anlegen 
159 0397" 09 rat 
ED 43 HiAD" setsec: ia (dsect},nc ‚ Sektor Nunmer ablegen 

x ret 
155 090’ ED AS MIAF' setdma! id (dcma),be ; queltıge Atresse ablegen 
155 Aal’ C9 ret 
157 y 
158 a0a2' mve! 
59 
6 i 
I6i ı Transfer von Speicherinnaiten mıt, 25% Power 
162 ; liebergahe ihL>=Ziel, <bE>suuelle,blslaenge 
i63 ; " 
1654 ” 
165 l2’ ER ex Je,n ; Ziel ın «öt> Welle ın <HL> 
ie A323’ ED ER laır ı fuer Transfer mıt Z&-Power 
167 a5’ EB ex ce,nl ; kegıster ın 'ürıgınalreinentelge‘ zurueck 


163 GeAe' C9 ret 











179 a7" sectrn: 

171 

172 i 

173 ı benarsetzung ges Skews 

174 ı Adresse ger lenersetzungstabelle ın <Dt>, ıst «lied 
175 ‚ Ist FEINE vabersetzung notwendig, nie iogıscne Sektoradgrasse 
176 ; ın {El entsprient gann ger pnysikaliscnen Sektorasress 
177 : 

178 

179 07° 55 ld lic ; rapie von <EL> nach imL> 

I ia n.D falis kein Srcw 

151 may" 7A ig 2.9 ; wenn «übz=d Kern Srhy 

132 nah’ 63 ar E 

133 ehb' 18 rat z ; 109 Sartorzpnvs Saktarnummer 
134 @AC’ EB ex Je,nl : <DE> => SHL> um 

155 ua’ 09 azd nl,be ; ütfset. In Tanelie berechnen 
15 OMRE' GE ig L.inis ; prys Sektor Nynne nach (mL 
187 Ar’ 26 ou ig n.d ; 212 physikalsiche Gertaragresse 
139 981" (9 ret, mt pnys. Sertoragresse ın /ML> 
189 

1 

191 az" read! 

132 

143 ; 

194 ı lesen eines Sektors 

135 ; Autrut mıt, falgengen Äraumenten bereits gesetzt! 

135 ‚ Laufwerksnummer ın tharyoy 

197 : Transferadresse ın (&ma) 

133 ; Transferbanke  ım (dgone) 

139 ; Tracknummer ın (Atpki 

Zum ; Sektornummer  ın (dsech) 

zu ; Zeiger aut Morm ın  «DE> 

202 ; 

0} 

Zu az" a 17% la br ,read$sector 

265 moB5’ (5 push be ; rette Funktion 

Zu, DAR CD a5 call setup ; berechne phys Track setze ssa 
297 0089’ EI pop hi ı Adresse ges UP’s (ReAD-WRITE) 
u 

Zu9 OBEA mre$retries! 

219 

ZI BuBA’ as A Ib] be ; 12 Versuche zulassen 

212 

213 aebc! retry$loop! 

214 

215 Aut’ C5 pusn De ; Schleifenzaehler 

216 W6BD’ E5 push hi up 

217 Bnbk' 3A 01" 14 a,(cursel ) ; neuer select (ohne sso) 

213 G0Cl' ZI HiA3’ ia hl,olasel ; Zeiger auf "letzen’ selert 
219 Mach" BE cp (hl) 

220 WoC5’ 77 la {hl),a ı fuer's naecnste mal .. 

221 euch" 20 aA r nz,newstrack  ; gann SEER 

222 0602’ 3A QiAB’ la a,(Atrk) ; alter Track (logısch) 

223 QaCh' ZI Aiaz' 13 hl,olatrk ; Zeiger aut letzen’ Track Öjogıscn) 
224 MOCE' BE cp ih) 

225 BOCH" 77 la (nl),a 

225 000’ 23 09 ir z,samestrack 

227 
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2:9 bal2' CO Gera 
23] W005’ 61 Aha 
232 Weg" Ch Aicl' 
233 

234 

235 Wu" 

2 

237 Wb" 3A MiAl‘ 
23 bele' 03 C) 
239 ad A Alan’ 
2a Wr} 03 02 
241 wir5' El 

242 Geh’ &5 

243 @.7' CO Aide' 
244 Buch’ E1 

245 Wed’ C 

245 @nEl’ (8 

247 @tD’ (5 

243 BucE' E5 

243 ir’ CB 67 
259 Qurl' CA oh" 
ZS1 infd' El 

252 ws’ Ci 

253 Gerk' 10C4 
254 

255 Gurg’ 

256 

Te 
253 Fa C3 

253 

269 

261 

262 

263 

264 

265 

Bas EURE" 

267 

23 Worb CD AA 
269 @uFE’ 28 95 
279 aim’ Ch alla’ 
Zr 9103’ MOM 
272 085° 78 

273 6196' 03 C) 
Zu ag 21 a 
275 H18' BE 

276 alec’ (2 

277 Gil" TE 

278 ade’ 0303 
273 a0’ @6 16 
280 @112' 13:02 
za 

282 


newstrack! 
call cnecktseek 
14 be, 16 
cali  delay 
same$track! 
ig a,lcurteK) 
aut (faetrk),a 
id a, (®secti 
aut, (facser),a 
pop hl 
pusn ni 
call  ipeni 
Pop hi 
pop be 
ret zZ 
pusn be 
pusn hl 
bit 4,a 
tali  NZ,cneck>seek 
pp hl 
POP be 
dinz  retrysioop 
haraserror! 
ld a] 
ret 
i 
‚ Askterskkarkrtie 
; mılfsprogramme 
‚ Areptrgähkssetkt 
checr$seak: 
call  reassıar 
Ir 2, 17$9K 
call  restore 
Ib] d,8 
17$0K: 14 4,0 
aut ifgetrk),a 
1b] hi,curtrk 
cp {nl} 
rat zZ 
i4 a,{nl) 
aut (foctat),a 
id b,saek 
Jr busysemg 


Track einstellen 
Ming 


' warten 


prvsikaliscner Track 


‚ Setzen 


pnysikalischen Sektor 
setzen 
up 
. retten fuer weiter Versuche 
ausfuehren 


Schleitenzaenier 
Fahie 


chi 
ehterfrei ... 


; evti RAr-Fenler 


gann nocnmais SEER 
ur 
Scnieifenzaehler 

. auch nach nochmalıgem SEER 


versuche Iu-Feid zu lesen 
wenn ak 
sonst mir 


' Ins Trackregıster 


Zeiger aut pnysikalischen Track 
beige ateich ? 

san fertıg 

sonst SÖLL-Regıster 

ıns Gatenregıster 


; + SEEK Befehi 


ausfuenren 


19 


283 6114 


Ri 


ie A Bla" 
Ei) 

IERC) 

'wc 
“+ 


Mr 

De Ca 
(84 

Zs' za FA 

Peru 1 P7 2) 

23 129 19 

ED) 

we alZa 

#2 

Ex 

704 

7 ElZA' 21 @1AS’ 

2 6120’ 06 C4 

I ElZF' ES 

319 6130' CD H17E’ 

21 8133" EI 

312 #134’ 46 

130135 09 

314 

si el" ZI Mr’ 

315 HI" SE 

70 26 

Filz ]E 





213 a1 ED 53 ir’ 


320 


26 aldn' A MiAk‘ 
327 6143' CB 7B 
2 als 
329 6147’ CB £B 
339 0149 28 02 
331 614B’ 87 

332 @14C' IF 

323 0140’ 32 H1Al’ 


334 0150" EM 
335 0152° 9 04 
335 6154' CB CF 
37 0156’ CR FB 
et 2 
339 0158’ 78 


349 A150’ 03 C4 
241 
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restore! 
la D,nome ; Laurwerk aur Indie a 
busyseng! 
la a,tcurstept ‚ stepeing-rate 
or D ‚ aınfyagen 
aut ifgeem2),a | Beten] ausgenen 
msy! in a.tfgcend: 
Prca 
jr ne .,nusy 
busviioın a,(foccanı I nun aryarten 
aut ”,a ı p1s NICHT manr DusY 
yr az,nusyl 
anı ad nen ı Saskıera KeküV 4 RAF-TESR 
ret 
reaasıat! 


setup! 


setx: 


setupl: 


; 
; jesen mas IF-Feines ın gen IDF-Pufrer 
’ 


14 hi,ıctour ; Braucht eigenen Futter 
14 b,reazın 

push hl 

call  geimata 

pop hl 

1b] b,{ni) ; Tracknummer 
rat. 

ie hi, xapni-1 ; Select 

Ib} e,'nl) ; jesen 

b-Te hi ; Steppingrate 
14 a,‘inl) 

ld (cursel ce ; anlagen 


; pnvsikalıscnen Track aus Ioaıscnen Track berecnnen 
; und gamıt sıge-select 


13 a,(dtrk) ; zuvor logıschen TRACK eınlasen 
bit 7,8 \ eınseitiges Laufwerk? 

r nz,setx ; wenn JA 

bit 5,e ‚ evti 3° 50? 

jr z,setx ; wenn IA 

or a ı reset CARRY 

rra HdR 

la (curtrk),a ; ıst pnysiraliscner Track 

id a;8 ; sso-Flag schuetzen 

jr ne, setup] ; Seite Al) 

set 1,a ; sso-pıt setzen 

set T,e ; auch in SELCOD sıde-seiect eınorıngen 
id (ssatiag),a ; sso-Flag ablegen 

ld 2,8 ; seiect 

ut. Ufgesel),a \ ausgeben 


342 

243 

344 

345 

246 @l5E' 21 dad 
347 Gib!’ 28 
248 @162' TC 
349 6163’ 85 
359 064’ 29 FR 
31 ir ch 
32 918° 07 
353 


359 0169 8 F6 
30 GIER’ (9 
31 

32 Al6l' 

33 

284 
35 

6 

37 

363 

39 ee 
379 6i6b' (5 
371 Blck' 06 E6 
372 176’ 9 
373 8171 1A FD 
374 6173° Ci 
375 #174 78 
376 6175 Bl 
37T aN7E' 20 FA 
373 172° 09 
379 

0 079° 

E21] 

32 

33 

Ka 

35 
6 
872179 06 

9 BITR' 2A AIAF’ 
399 

Te A 
31 0181’ 89 

392 #182" de (3 
393 #134’ 03 CA 
394 #185’ DB CA 
395 6139’ 97 

336 #189" 30 FR 
397 01238’ 08. C9 
SR MEL' CB 4F 
Er) 2 
sea @131’ ED A2 
461 6193’ 13 638° 
402 

403 01%" CB 47 
404 61 CZ H15R’ 


‚ . 
; Testen ob Diskette eıngeisat ist 
ı 


repeat! 1d n1;# ; time_out, 
setup2: nec n ’ tine_out -1 
ld a,n 
or l 
jr z,repeat, ; 85 kann nicht sein 
in a,lfgcong) 
rlca ; rAur? 


i Anmerkung: bei festvergrahtetem REAUY ıst, oiese Rautıne 
‚ sinnlos !Il! gann evtl inger-Lsch anfragen .. 
; 


jr c,setup? 
ret 
aelay! 
’ 
; arteschieife mit Zaehier in (0) 
; Je eınheit wırd I ms owartet. 
oet bc 
push be 
ld 2,20 : bei 4 Mrz 
gell! mp 
amz gell 
pop be 
19 2.0 
or c 
Ir nz,oelav 
ret 
reasssector: 
i 
; lesen eınes physikalischen Sektors 
; Erwartet Disk-Track-Sektor-DMA gesetzt 
id b,reaas 
id hi, t&uma) 
getdata:ld a,ssotlag) ; sso-Eit 
or b ı ın Befenl einfuegen 
ld c,fdedat ; Datengort 
out (fdcemd),a ; Befehl ausgeben 
getdl: in a,(focsel) ‚ abwarten bıs 
rlca ı BuSY aktıv 
ir nc,getal 
geta2! in a,(faccmd) ; Status abfragen 
bıt l,a ; 0? 
jr z,getg3 ‚ wenn nocn nicht ... 
ını ı sonst Daten einlesen 
Jp setd2 ‚ ung weiter a0fragen 


gta}! pıt 9a 
IF nz,getg2 


nıcht menr EUSY? 


nach 25)ns Deiay 


426 

421 Bir! 
422 hihh' 
422 @1Al' 
424 HiA2’ 
425 013° 
425 6iA4' 
427 @1A5’ 
423 HAB’ 
423 BAD’ 


He ER FÜ 


FF 


OO 
1] 


a) 


450 GIAF' aaa 


451 
432 
433 
434 
445 
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siel' 


’ 


ı geissen . 


and 
ret 


ipchl! jp 


i 

‚ Akkkaakttckftitg 
; Varıablenbereicn 
33332733777 77777 


’ 


cursel: os 
curstepias 
curtrki os 
oLdtrk: as 
olasel: do 
ssoflag:as 
igtbut! os 
etrki de 
&sect!: cu 
dma) dw 


nbutf  equ 


ill 


nl} 


' Fenier maskleren 


; Ingirekter (ALL 


momentaner Select 
‚ aamentane steppıng-rate 
; physikalischer Sektor 


; unqueltig beim Start 


Kapitel 5 Das CP/N BIOS - Bin Vberblick 


Das BIOS (Basic Input Output Systen - Grundsystem der Datenein- 
und Ausgabe) ist die Hardware-Anpassung an eine bestimmte CP/N- 
Maschine, 


Prinzipiell unterscheidet sich das B10S verschiedener Computer 
nur im Aufbau bestimmter Hardware-Treiber. Dieser Unterschied 
kann sehr gering, aber auch recht drastisch sein, ist jedoch 
immer nur abhängig von der Ähnlichkeit der benutzten Hardware. 


Immer gleich ist auf jeden Fall die Einsprungleiste des BIOS. 
Hierunter ist eine Sprungtabelle in die verschiedensten Unter- 
programme zu verstehen, über die das BVOS oder gegebenfalls auch 
ein TPA-Programm bestimmte Funktionen des BIOS erreichen kann. 


Der Aufbau der Sprungtabelle, deren Reihenfolge unveränderbar 


ist, ist dem in Kapitel 6 abgedruckten BlOS-Kernprogramn 
(BlIOSKRNL) zu entnehmen. 


Die einzelnen Funktionen des BIOS werden auf den nachfolgenden 
Seiten etwas genauer beschrieben. Im übrigen wird hierzu auf die 
abgedruckten Listings verwiesen. 
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+ .——j1[j21-222>2 222 an nun aaa en nnn ann ann en nn 
t BIOS Funktion ® BOOT (Kaltstart) ! 


! Initialisierung des CP/M 3 Systems und laden des ! 
CCP'’s von Diskette. Starten des Systens ! 


! Eingabe keine ! 
! Zurück in den CCP ! 


Diese kinsprungstelle wird vom CP/M-Lader aus Bank ® heraus 
angesprungen. 


In diesen Unterprogramnm ist die letzte Möglichkeit gegeben, 
Schnittstellen, die nicht vom Monitor, Boot-Programm oder den 
Lader-BlOS angesprochen wurden, nachzuinitialisieren. 


Nach der Grund-Initialisierung werden noch die Einsprungadressen 
in den Warmstart (WBOOT) auf Adresse ® der TPA und der Einsprung 
in das BIOS auf Adresse 5 in der TPA initialisiert. 


Danach wird die Datei CCP.COM von Diskette in die TPA und einen 
reservierten Speicherbereich geladen. Ebenfalls aus diesem Un- 
terprogramm heraus wird die Systemmeldung auf die Konsole ausge- 
geben und erst danach die Kontrolle an den CCP übergeben. 


Da aus diesem Programm heraus alle Parameter neu (bzw. erstmals) 
gesetzt werden, spricht man von einem Kaltstart. Er wird nur nach 
dem Booten vorgenonmnen. 


Es ist notwendig nach Aufruf dieses Unterprogramnes einen eigenen 
Stackbereich im gemeinsamen Speicherbereich bereitzustellen. Aus 
dem Programm heraus können nach der endgültigen Hardware-Ini- 
tialisierung BDOS-Aufrufe vorgenommen werden. Diese werden vor 
allem benötigt um den CCP von der BOOT-Diskette zu laden. Falls 
die Datei CCP.CON auf der Bootdiskette nicht gefunden wird, muß 
dies dem Benutzer gemeldet werden. 


Dieses Unterprogramm kann teilweise in Bank ® liegen. 
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! Nachladen und Aufruf des CCP's ! 


Eingabe keine ! 
Zurück in den CCP ! 


EEE 


Dieses Unterprogramm wird von jedem Sprung auf Adresse ® in der 
TPA oder dem Ausführen der Funktion ® als BDOS-Aufruf ausgeführt. 


Das Unterprogramm übernimmt eine Neuinitialisierung der Systen- 
parameter, jedoch nicht die der Hardware-(Nach-) Initialisierung. 


Es erfolgt nach Aufruf des Unterprogrammes keine Systemmeldung, 
vielmehr wird der CCP aus dem dafür reservierten Speicherbereich 
in einer Bank, in die TPA umgeladen und dort direkt ausgeführt. 


Die Funktion muß einen eigenen Stack bereitstellen, der im 
gemeinsamen Speicherbereich liegen muss. 


Es ist zu beachten, daß weder der Warnstart noch der CCP die 
Disketten Parameter zurücksetzt. Dies kann nur mit einem CNIRL-C 
nach dem Prompter des CCP's erfolgen oder durch einen entspre- 
chenden BDOS-Aufruf. 


Dieses Unterprogramm liegt im gemeinsamen (Common) Speicherbe- 
reich. 
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+--------------- + 
! Lesen des Eingabestatus der Konsole ! 
+--------------- + 
! Eingabe keine ! 
! Zurück A=00 es liegt keine Eingabe vor ! 
H oder A=FF es liegt eine Eingabe vor ! 
+--------------- 22 E 


Diese Funktion übergibt dem Aufrufer den kingabestatus der 
Konsole. Dieses Unterprogramm liegt im gemeinsamen Speicherbe- 
reich, kann also aus allen Banken aufgerufen werden. 


+----------------- + 
! BIOS-Funktion 3 CONIN (Konsoleneingabe) ! ef 
+---------------- + 
! Lesen eines eingegebenen Zeichens von der Konsole ! 
+---------------- 222222 + 
! Eingabe keine ! 
! Zurück = eingegebenes Zeichen ! 
+---------------- - -- + 


Diese Funktion liest ein Zeichen von der Konsole (Tastatur) und 
übergibt es dem Aufrufer in Register A. Liegt kein Zeichen vor, 
so wird gewartet, bis ein Zeichen eingegeben wurde. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+-------- ------ ----- + 
! BIOS-Funktion 4 CONOUT (Konsolenausgabe) ! 
+22 -- + 
! Ausgabe eines Zeichens auf die Konsole (Bildschirm) ! 
+------------------- - ---- 22222 + 
! Eingabe = auszugebendes Zeichen ! 
! Zurück = ausgegebenes Zeichen ! 
+----------------- ------ 2 x 


Diese Funktion gibt das in Register C Übergebene Zeichen an die 
Konsole aus. Das Zeichen wird im ASCII-Format ohne Parity über- 
geben. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


a a U 
t BIOS-Funktion 5 LIST (Druckerausgabe) ' 
+------------------ + 
! Ausgabe eines Zeichens auf den Drucker ! 
=——— u— nein —nish nen nun nnn nn nn nn ne nen un nn un nn nn nn nn nn nn nn nn nm + 
! Bingabe = auszugebendes Zeichen ! 
t Zurück A= ausgegebenes Zeichen ! 
+----------------- 2222220 + 


Diese Funktion gibt das Zeichen in Register C auf den Drucker 
aus. Das Zeichen ist im ASCII-Format ohne Parity. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 
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! BlOS-Funktion 6 AUXOUT ( Ausgabe auf AUX ) ! 
+---------------- 7 + 
! Ausgabe eines Zeichens auf den AUX-Kanal ! 
+22--- 7772-77 + 
! Eingabe C= auszugebendes Zeichen H 
! Zurück A= ausgegebenes Zeichen ! 
+-------------- + 


Diese Funktion gibt das Zeichen in Register C an den Zusatzkanal 
(AUX) aus. Das Zeichen ist im ASCII-Format ohne Parity. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+------------------ + 
! BlOS-Funktion 7 _ AUXIN ( Eingabe von AUX) ! 
+--------------------- + 
! Einlesen eines Zeichen vom AUX-Kanal ! 
+--------------- + 
! Eingabe keine ! 
! Zurück = eingegebenes Zeichen ! 
+--------------- 20. + 


Diese Funktion liest ein Zeichen vom Zusatzkanal (AUX). 


Von verschiedenen Programmen ( z.B. PIP.CON ) wird ein einge- 
lesenes 1AH als Endezeichen einer Übertragung verstanden. Liegt 
beim Aufruf der Funktion noch kein Zeichen vor, wird auf die 
Zeicheneingabe gewartet. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+-------- -------- + 
! Lesekopf des Laufwerkes über Track ® positionieren ! 
+------------------ 222-0 + 
! Eingabe keine ! 
! Zurück nichts ! 
+27 + 


Diese Funktion führt die Positionierung des Kopfes direkt aus 
oder setzt den Track-Zeiger auf ®©. Im letzteren Falle wird die 
Positionierung erst beim nächsten Schreib- oder Lesezugriff 
vorgenonmnen. 


Dieses Unterprogramm kann in Bank ® liegen. 


+---7---- 72 + 
t BIOS-Funktion 9 SELDSK ( Laufwerk anmelden ) ! 
+------------------ + 
! Anmelden und selektieren eines Laufwerkes ! 
ee nnd ann sa en een 
! Eingabe C= anzusprechendes Laufwerk ! 
! 00=A, ®1=B ..,, ®F=P ! 
! E= Erstaufruf-Flag ! 
! Zurück HL= Adresse des XDPH oder ! 
! HL= 0000 falls ungültiges Laufwerk ! 
+77 2222 222.00. + 


Diese Funktion selektiert das in Register C genannte Laufwerk für 
den weiteren Diskettenzugriff. 


Die Selektion bleibt bis zum nächsten (geänderten) Aufruf er- 
halten. Bei jedem Aufruf muß die Funktion im Doppelregister HL 
die Adresse des laufwerkstypischen DPH (Disk Parameter Header - 
Disketten Parameter Kopf) übergeben. Ist das gewünschte Laufwerk 
nicht eingebunden (d.h. ist kein DPH vorhanden’), muß HL=9090 
übergeben werden, 


Beim Aufrufen der Funktion kann unterschieden werden, ob dies ein 
erster oder ein nachfolgender Aufruf ist. Ist es der erste Aufruf 
eines Laufwerkes oder wurde (nach einem späteren Aufruf) ein 
hardware-Fehler gemeldet, so wird die Funktion (mit Bit ® des 
Registers E auf 1 gesetzt) aufgerufen, andernfalls ist Bit ® des 
Registers auf ® gesetzt. Ist das Ersterkennungsflag gesetzt (Bit 
0=1) muß das Unterprogramm einen Aufruf des Unterprogrammes LOGIN 
veranlassen. In diesem Unterprogramm kann nun durch verschiedene 
Nittel festgestellt werden, ob der angegebene DPH zur eingelegten 
Diskette paßt. ( bzgl. der Schreibdichte, der Sektoranzahl oder 
der Seiten). Ist dies nicht der Fall, kann der DPH angepaßt wer- 
den. Nicht verändert werden darf jedoch die Adresse des DPH's. 


XIX Zum Begriff DPH und LOGIN siehe Kapitel 8 - DISKIO. xıı 


Dieses Unterprogramm kann in Bank ® liegen. 
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! Eingabe BC=Tracknumnmer 
! Zurück nichts 


Diese Funktion setzt die Tracknummer wohin der Schreib- 
vor dem nächsten Diskettenzugriff positioniert werden sol 


Dieses Unterprogramm kann in Bank ® liegen. 


+2222222- 2-2 2-2 + 
! BIOS_Funktion 11 SETSEC (Sektor setzten) ! 
+27 2222-22-22 + 
! Öbergabe der Sektornummer zum nächsten Disk-Zugriff ! 
+22-2----------------- 2 -------- + 
! Eingabe BC=Sektornumner ! 
! Zurück Nichts ! 
+--------------------------------------- 22-22-2200. + 


Lesekopf 


Diese Funktion setzt die Sektornumner von welchem beim nächsten 
Diskettenzugriff gelesen oder auf welchen geschrieben werden 


soll. 


Die im Doppelregister BC übergebene Sektornunner ist der Wert, 


der nach Aufruf der BlOS-Funktion 16 ermittelt 
dort). 


Dieses Unterprogramm kann auf Bank ® liegen. 


+  ————muuhnaonnonan non ann nn un nn nn nu nn ann 
! BlOS-Funktion 12 SETDMA (DMA Adressieren) 

+ en nn nd m en u a a a u a an ai an m a an a mans 
! Übergabe der DMA-Adresse 

+ ———emmniueanon-2->2<<> „zz za za n ae aan nn nun mn 
! Eingabe BC=DMA-Adresse 

! Zurück nichts 

+ meetmamannnnannnzzzanaazzozzzzanszzzaonnncnn nn nun m 


wurde 


(siehe 


Diese Funktion ermöglicht es die DMA-Adresse (Direct Memory Ac- 
cess - Adresse des direkten Speicherzugriffes) zu setzen. 


Ab bzw. an diese Adresse wird der nächste Sektor gelesen bzw ge- 
schrieben. Die übergebene DMA-Adresse bleibt erhalten, 


von einem weiteren Aufruf geändert wird. 


Dieses Unterprogramm kann in Bank ® liegen. 


bis sie 
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+27... + 

! Lesen eines physikalischen Sektors ! 

+-------------------------- > + 
Eingabe keine 


A=01 Sektor nicht lesbar 


! ! 
! Zurück A=0®0 Sektor fehlerfrei gelesen ! 
! ! 
! A=FF Diskette gewechselt ? ! 


Diese Funktion liest den mit SETSEC definierten Sektor von dem 
mit SETTRK gesetzten Track in den mit SETDMA spezifizierten 
Speicherbereich von der mit SELDSK angesprochenen Diskette. 


Gelesen wird immer ein physikalischer Sektor, d.h. die Sektor- 
größe die im DPB angegeben wurde (siehe Kapitel 9 DISKIO). Diese 
Sektorgröße kann bis zu 1024 Bytes groß sein. 


Im Gegensatz zu CP/M 2 übernimmt das Sektor -blocking und -de- 
blocking das BDOS. (hierunter ist die 'Umwandlung'’ der physi- 
kalischen Sektorgröße in die logische (128-Byte große) Sektor- 
größe zu verstehen). 


Wurde der Sektor einwandfrei gelesen, wird dem Aufrufer Register 
A=0® übergeben. 


Konnte der Sektor nicht gelesen werden, müssen zunächst mehrere 
Versuche vorgenommen werden. Im Fehlerfalle muß die Art des 
Fehlers festgestellt werden. 


Stimmen bei der Fehlerfeststellung nur die Diskettenparaneter 
nicht mehr (Density Sektoranzahl Trackanzahl) so muß Register 
A=FF zurückgegeben werden. In diesem Fall wird vom BUOS noch 
einmal die Funktion SELDSK aufgerufen, mit Register E Bii ®=1 um 
ein erneutes LOGIN des Laufwerkes zu erzwingen, da offensichtlich 
die Diskette gewechselt wurde. 


Ist die Diskette mit keinem Nittel zu lesen, liegt vermutlich ein 
Hardware-Fehler vor (unformatierte Diskette oder defektes Lauf- 
werk). In diesem Falle wird das dem Aufrufer durch Rückgabe von 
Register A=®1H signalisiert. 


Dieses Unterprogramm kann in Bank ® liegen. 
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+22 -------- --- 2222. _____ = 
! Eingabe = deblocking Code ! 
! Zurück A= 00 kein Fehler beim Schreiben ! 
! A= ®1 Sektor nicht beschreibbar ! 
! A= 02 Diskette schreibgeschützt ' 
! A= FF Diskette gewechselt ? ! 
emsmmmsn as u + 


Mit dieser Funktion kann ein physikalischer Sektor geschrieben 
werden. 


Es gelten dieselben Bedingungen wie bei der BlOS-Funktion 13. 
Sollte das Blocking ( Aufteilen in 128 Byte Sektoren ) vom Be- 
nutzer übernommen werden, stehen hierzu in Register C folgende 
Informationen zur Verfügung: 

C=0® Schreiben eines geblockten (späteren) Sektors 


C=®1 Schreiben eines ungeblockten (nur 128 Byte großen) 
Sektors. 


C=®1 Schreiben des ersten Sektors in einem neuen 
Datenblock 


Wie beim Lesen sollte die Funktion im Fehlerfalle mehrere Ver- 
suche machen. » 


Im Fehlerfalle A=FF veranlaßt das BDOS einen erneuten Aufruf von 
SELDSK um die Diskettenparaneter neu einloggen zu können. 


Dieses Unterprogramm kann in Bank ® liegen. 


3 


! BIOS-Funktion 15 LISTST (Druckerstatus) ! 


+---------- ---------- 7222-2 - + 
! Lesen des Drucker(ausgabe)status ! 
+27 ----- + 
! Eingabe keine ! 
! Zurück A=02 Drucker nicht bereit ! 
! A=FF Drucker bereit ' 
+----------------------------- + 


Diese Funktion meldet in Register A die Bereitschaft des Druckers 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+---7------------------------------- ------------- + 
! BIOS-Funktion 16 SECTRN (Sektorunsetzung) ! 
+2------------------------ ------ 2-2 - + 
! Berechnung der physikalischen Sektornumner ! 
+2227722-27 72-222 -- + 
! Eingabe BC=Logische Sektornumner ! 
! DE=Adresse der SKEW-Tabelle ! 
! Zurück HL=physikaliche Sektornumner ! 
+27 ---------------------------- 22222222 + 


Mit dieser Funktion wird der Sektor-SKEW umgerechnet. 


(Siehe hierzu Kapitel 8 DISKIO). Dieser SKEW ist für Disketten im 
IBM 3748 Format (Standard CP/M 8" einfache Dichte) mit dem Faktor 
6 festgelegt. 


Die Routine muß die Umrechnung von logischen in physikalische 
Sektornummern anhand der ebenfalls übergebenen (Adresse der) 
SKEW-Tabelle berechnen. Wird DE=0099 übergeben, bedeutet dies, 
daß kein SKEW-Faktor zu berechnen ist, in diesem Falle kann der 
Inhalt von Register BC direkt in Register HL umgeladen werden. 


Es ist zu beachten, daß, entgegen der Gepflogenheiten beim 
Formatieren, mit Sektor ® begonnen wird und nicht mit Sektor 1 ! 


Dieses Unterprogramm kann in Bank ® liegen. 
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KIXIXXXKXIKKXIXKIIXNKNKIKKIIKIKINININKIXKXKNIKIKXKNIKKINNIIIIINK 
x Alle nachfolgenden BIOS-Funktionen sind CP/M 3 typisch X 
X und in der CP/M 2 Sprungleiste nicht enthalten. Es ist x 
x zu beachten, daß CP/N 2 Systeme auf dem Markt sind,die x 
x ebenfalls eine erweiterte Sprungleiste haben, diese 1 
x muß aber nicht notgedrungen CP/N 3 kompatibel sein. x 
XXKIXXXIXIIKXKIKKIKIKKKIXIINININIKKNKKIXKKNNIKKKIKKKIIKKIKIIIINK 


+22 -------------------- 202. + 
! BIOS-Funktion 17 CONOST (Konsolen-Ausgabestatus) ! 
+-2-----2----------------------- + 
! Festellen ob Konsole ausgabebereit ist ! 
+------------------------- ---- + 
! Eingabe keine ! 
! Zurück A=00 nicht bereit zur Ausgabe ! 
! A=FF Konsole bereit zur Ausgabe ! 
+22--------- + 


Nit dieser Funktion kann die Bereitschaft der Konsole, ein 
weiteres Zeichen auszugeben, getestet werden. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich 


+27 2-2 + 
! BlOS-Funktion 18 AUXIST (AUX-Eingabestatus) ! 
+72 - 2 + 
! Feststellen der Bereitschaft des AUX-Eingabekanals ! 
+-227------------------ 2-2. + 
! Eingabe keine ! 
! Zurück A=0® Nicht bereit zur Eingabe ! 
! A=FF AUX-Kanal bereit zur Eingabe ! 
+----------------------------- 2-2 22 + 


Diese Funktion testet den AUX-Eingabekanal, ob ein Zeichen ein- 
gegeben wurde. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+ m —smansonnnnzzananoscozzzoozzzaozzauam ccm somunemuuememe. 
! BIOS-Funktion 19 AUXOST (AUX-Ausgabestatus) ! 
t+------------ - --------------- -- > --- -- 22. + 
! Feststellen der Bereitschaft des AUX-Ausgabekanals ! 
+--------- --------------- ----------------------- + 
! Eingabe keine ! 
! Zurück A=0® wenn nicht bereit ! 
! A=FF wenn Ausgabekanal bereit ! 
+222---------------------------- + 


Diese Funktion testet den AUX-Kanal, ob ein Zeichen eingegeben 
wurde. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 
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+ 
! Zeiger auf DEVICE-Tabelle holen H 
+7227772---------------------- 2. + 
! Eingabe keine ! 
! Zurück HL=Zeiger auf DEVICE-Tabelle ! 
+27 ----- ------------- 2... + 


Durch Aufruf dieser Funktion wird dem 'Rufer' die Startadresse 
der DEVICE-Tabelle übergeben. 


Diese Tabelle (siehe hierzu Kapitel 7 CHARIO) übernimmt die 
Funktion des IO-Bytes unter CP/M 2. Es sind in der Tabelle alle 
implementierten (Zeichen)-Schnittstellen zusammengefaßt, so da» 
über die Tabelle jede Schnittstelle angsprochen werden kann. Der 
Aufbau eines jeden Kintrages sieht wie folgt aus: 


b.) "BEVNAM Nam oer Schnittstelle z.E iehM,FRinT usw 
ger Name muss 6 Zaıcnen iang sein, evti 
autzetuellt kit Leerzeichen 


20 RD beschreibung der Schnittsteiie 
hulsdanı wenn entsprechenges Eil=] 
IE \______ Einaabeeimeit 
ur \______ Ausgabweınneit 
KERN. Bawrate duren Software aınsteiinar 


Serienschnittstelie 
_ Sehnittszelie mıt KÜN/AOFF-Prowonoll 
£it 5 7 nicht beiagt 





bu) Dawjrate Anaane zer Baulrate pacn Taigenner TaDelie 
imzreine Gaugrate (paraliell-tetrien: 
wı5nbaun,2=75 Bawi.n35=1196aud,#4=134,5 Gaun 
WE] Saul, He iuheaud, 47=Eintaug, ÜR=] Zi 
WI tan amade an eazmeaug 
Me ee I Renaug, dr = yambauı 


Abgeschlossen wird die Tabelle durch ein NULL-byte. 


Dieses Unterprogramm incl. Tabelle liegt im gemeinsamen Speicher- 
bereich. 
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! BIOS-Funktion 21 DEVINI (DEV-Initialisierung) ! 


+------------------------ - 22222 --_-_-_-- + 
! Initialisierung aller Einheiten in der DEV-Tabelle ! 
+22----------------- 22 -------______ + 
! Eingabe C=DEVice-Numner (®..15) ! 
! Zurück nichts ! 
I=27427 7 + 


Diese Funktion wird üblicherweise nur von dem DEVICE-Befehl ange- 
sprochen. 


Es kann damit eine Ein- bzw. Ausgabeeinheit spezifisch nach- 
initialisiert werden. Notwendig ist diese Funktion nur, wenn das 
AON/ KXOFF-Protokoll oder die Baudrate über Software umgeschaltet 
werden kann. 


Sind diese Funktionen nicht erwünscht oder nicht möglich, kann 
die Funktion mit einem einfachen RETurn abgeschlossen werden. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


222-222 -------- 222222 ------- + 
! BIOS Funktion 22 DRVIBL (Laufwerkstabelle) ! 
+22--222--------------- --------- 2-22 + 
! Zeiger auf Laufwerkstabelle holen ! 
+22---------------------- 22-2222 + 
! Eingabe keine ! 
! Zurück HL=Startadresse der Tabelle ! 


' 
' ' 
! HL=FFFF wenn keine DRVIBL benutzt ! 
! Puffer müssen deklariert werden H 
! Hashing wird unterstützt ! 
! HL=FFFE dto. jedoch auch kein ! 
! Hashing zugelassen (s. GENCPN) ! 


Diese Funktion übergibt die Startadresse einer Tabelle nit 16 
Vektoren, die auf die 16 möglichen DPH (Disk-Parameter-Header) 


zeigen. Der erste Eintrag entspricht dabei Laufwerk A, der zweite 
Eintrag Laufwerk B usw. 


Hat ein Laufwerk keinen DPH ( ist es also logisch nicht einge- 
bunden), ist der entsprechende Vektor auf 0000 zu setzen. 


Soll das Blocking- und Deblocking vom BIOS übernommen werden, 
(aber wer tut das schon ...) muß HL ebenfalls mit dem Wert FFFE 
zurückgegeben werden, darüberhinaus muß PSH und PSX im ent- 
sprechenden DPB auf NULL gesetzt werden. 


Dieses Unterprogramm incl. der Tabelle liegt im gemeinsamen 
Speicherbereich. Die Vektoren in der Tabelle können jedoch auf 
Adressen im gebankten Bereich (Bank ®) zeigen, dies bedeutet, daß 


unter CP/M 3 die Daten des DPH's nur bedingt von TPA-Programmen 
erreichbar sind. 
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+------------------ + 
! Setzen des Mehrfachsektor-Zählers ! 
+-------------------- + 
! Eingabe C=Zähler ! 
! Zurück nichts ! 
+----------------- + 


Diese Funktion hat nur sehr bedingt etwas mit der BDOS-Funktion 
44 tun. 


Um Speicherinhalte auf oder von Diskette zu transferieren, ruft 
das BIOS zuerst diese Funktion auf und danach eine Serie von 
LESE- oder SCHREIB-Befehle. Diese erlaubt dem BIOS (falls ent- 
sprechend implementiert) mit einem Zugriff u.U. mehrere Sektoren 
hintereinander in oder aus dem Puffer zu lesen. 


Die maximale Sektorzahl ist abhängig von der physikalischen 
Sektorgröße, so sind Blöcke von 1281128-kyte Sektoren bis 414095- 
Byte Sektoren mit einem Aufruf möglich. d.h. die maximale Block- 
größe entspricht 16K, dem Inhalt eines DIR-Eintrages. 


Die Anwendung dieser Funktion wird etwas unübersichtlich, wenn 
ein Sektor-SKEW verwendet wird; ebenso, wenn unterschiedliche 
Diskettenformate und Sektorgrößen verwendet werden. Durch die 
dadurch erheblich aufwendigeren Berechnungsalgorithmen kann der 
Vorteil eines schnelleren Diskettenzugriffes wieder verloren 
gehen, daher wird die Funktion relativ selten genutzt. 


Dieses Unterprogramm kann im gebankten Speicherbereich liegen. 
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+=------------ 77 + 
! BlOS-Funktion 24 FLUSH (Puffer freigeben) ! 
42-------- + 
! Pufferfreigabe, falls Blocking- und Deblocking vom |! 
! BlOS übernommen wird ! 
42-22 00 + 
! Eingabe keine ! 
! Zurück A=00 wenn kein Fehler vorliegt ! 
! A=®1 wenn phys. Fehler vorliegt ! 
! A=02 wenn Diskette schreibgeschützt! 
+----------------- + 


Wenn das Blocking- Deblocking (Umwandeln von physikalische in 
logische Sektoren oder umgekehrt) vom BlOS übernommen wird, müs- 
sen nach Aufruf dieser Funktion noch nicht geschriebene (logi- 
sche) Sektoren aus dem Puffer auf Diskette geschrieben werden. 


Darunter ist folgendes zu verstehen: 


Die physikalische Sektorgröße sei 1024 Bytes pro Sektor, dies 
entspricht 8 logischen Sektoren zu je 128 Bytes. Soll nun z.B. 
ein Programm von 1508 Bytes (knapp 12 logische Sektoren) auf 
Diskette geschrieben werden, so werden zuerst 8 logische Sektoren 
zu einem 1024 Byte-Block zusammengefaßt. Dieser Block wird dann 
auf Diskette geschrieben. Danach werden die nächsten 4 logischen 
Sektoren in den Puffer geschrieben, ein physikalischer Zugriff 
würde jedoch erst erfolgen, wenn die Sektorgröße von 1024 Bytes 
erreicht wäre. Ist das BDVOS jedoch mit dem Datentransfer zu Ende, 
ruft es zum Abschluß die Funktion FLUSH auf, nun muß der letzte 
Pufferinhalt, sei der Puffer voll oder nicht, auf Diskette ge- 
schrieben werden, um die gesante Datei zu sichern. 


Wird diese Funktion nicht benötigt, so muß sie beim Aufruf das 
Register A=®0 zurückgeben. 


Dieses Unterprogramm kann in Bank ® liegen 
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! Eingabe HL=Zieladresse des Transfer ß 
! DE=Quelladresse des Transfer ! 
! BC=Länge des Speicherblockes ! 
’ ’ 
’ ’ 
' ’ 


! Zurück HL und DE müssen auf die jeweils 

! letzte Adresse +1 des Transfers 

! zeigen. 

+------------------ -----------------------2--------- + 


Diese Funktion übernimmt den Datentransfer innerhalb einer Bank 
oder auch zwischen verschiedenen Banken, wenn zuvor die BIOS- 
Funktion 29 aufgerufen wurde. 


Es ist zu beachten, daß die Quell- und Zielzeiger zur Anwendung @) 
des Z80-Befehles LDIR in umgekehrter Reihenfolge stehen. 


Diese Funktion liegt im gemeinsamen Speicherbereich. 
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! Eingabe C=0® Uhrzeit und Datum aus der Uhr ! 
! lesen und in den SCB schreiben! 
! C=FF Uhrzeit und Datum aus dem SCB ! 
! lesen und Uhr entsprechend ! 
! nachstellen ! 


Diese Funktion erlaubt die Implementation von Datum und Uhrzeit 
in einem CP/M 3 Systen. 


Ist die Uhrzeit interrupt-getrieben, muß das Einschreiben der 
Uhrzeit in den SCB von der entsprechenden service-Routine über- 
nommen werden. Bei einem Aufruf mit C=0® kann die Funktion dann 
mit einem einfachen RETurn abgeschlossen werden. 


Das Format, unter welchem die Uhrzeit und das Datum abgelegt 
wird, ist unter der BDOS-Funktion 1®4 beschrieben. 


Wird TIME nicht unterstützt, so kann die Funktion mit RkTurn 
abgeschlossen werden. Das BVDOS wird trotzdem das Datum und die 
Uhrzeit im SCB setzen, von wo aus es für Benutzerprogramme zu- 
gänglich ist, es bleibt dabei lediglich die Uhr 'stehen’. 


Dieses Unterprogramm liegt im gemeinsamen Bereich, Teile davon 
können im gebankten Bereich (Bank ®) liegen, die Umschaltung wird 
jedoch intern vorgenommen, so daß TPA-Programme auf die Funktion 
zugreifen können. Die Benutzung der BVOS-Funktionen 104..105, um 
die Uhrzeit zu 'erfragen' ist jedoch meist sinnvoller. 
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+4==-+2----- ---- + 
! Einstellen einer Speicherbank ! 
+=7-=----- + 
! Eingabe A=Speicherbank 00=2,01=1 usw ! 
! Zurück nichts ! 
4===42------ --- + 


Mit dieser Funktion wird die Bank umgeschaltet. 


Es können 16 Banken zu je 64k genutzt werden. Alle Banken müssen 
unter CP/M 3 einen gemeinsamen Speicherbereich von 4..8K von 
Adresse FFFF in Richtung Adresse 0000 haben. Der gemeinsame 
Bereich muß in allen Banken gleich groß sein. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich, kann 
aus der TPA heraus jedoch nicht aufgerufen werden, da die Rück- 


kehradresse ja durch die Bankumschaltung nicht mehr stimnt. 1%) 
+=-------------- 0 + 
t BIOS-Funktion 28 SETBNK (DMA-Bank einstellen) ! 
+------ == + 


! Einstellen der Speicherbank für den nächsten ! 
! DMA-Datentransfer ! 


+=-------------- + 
! Eingabe A=Speicherbank ! 
! Zurück nichts b 
+--------------- + 


Diese Funktion entspricht der Funktion 27, hier wird jedoch die 
Bank festgelegt, in oder aus welcher der nächste LESE- oder 
SCHREIB-Befehl die Daten transferiert. 


Dieses Unterprogramm liegt im gemeinsamen Speicherbereich. 


+--------------- + 
! BIOS-Funktion 29 XMOVE (erweiterter Datentransfer) ! 
+=------------ --- + 
! Transfer von Daten zwischen den Banken ! 
+-------------------- + 
! Eingabe B=Zielbank (wohin) ! 
! C=Quellbank (woher) ! 
! Zurück nichts ! 
+-7=---------------- + 
Diese Funktion ermöglicht den Datentransfer zwischen den Banken. ) 


Sie wird zu dem alleinigen Zweck aufgerufen, die Adressen der 
Ziel- und Quellbank abzulegen und ein Flag zu setzen. 


Der eigentliche Transfer geschieht erst mit Aufruf der BIOVS- 
Funktion 25 (MOVE), die das entsprechende XMOVE-Flag bei jedem 
Aufruf prüfen und den Datentransfer entsprechend handhaben muß. 


Diese Funktion liegt im gemeinsamen Speicherbereich. 
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! BIOS Funktion 30..32 Reserve ! 
+----------------- + 


Diese drei Einsprünge sind von Digital Research als Reserve 
deklariert. 


Funktion 30 ist jedoch für spezielle System-Implementationen 
freigegeben, kann vom Benutzer also frei verwendet werden. 


Dieser Einsprung wird zwar vom BVLOS nicht verwendet, bietet sich 
jedoch an, spezielle Hardware-Treiber einzubinden, die von TPA- 
Programmen aufgerufen werden können. Sind mehrere Treiber einge- 
bunden, kann die Funktion z.B. die Adresse einer weiteren 
Funktionstabelle übergeben. 
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Kapitel & Das B108-Kernprogrann und der SCy 


Der tbersichtlichkeit halber ist das BIOS normalerweise in ver- 
schiedene Funktionsblöcke aufgespaltet, die einzeln einfacher zu 
überblicken und zu bearbeiten sind. 


Zwei Programmsegmente sind jedoch menr oder weniger unveränder- 
bar: 


L; Die SCB-Vektortabelle 
2. Das BlOS-Kernprogramm 


Der SCB (System Kontroll Block) besteht im Prinzip nur aus 
Adressreferenzen, auf welche die verschiedenen BIOS-Programnteile 
als EXTERNAL (externe Linkadresse) zugreifen. Die im SCB genannte 
BASIS-Adresse ist rein fiktiv. Sie wird ebenfalls wie alle 
Offset-Adressen vom Generierungsprogramm GENCPM entsprechend den 
Systemgegebenheiten angepaßt. Dies darf jedoch unter keinen Um- 
ständen dazu führen, daß im BIOS Adressen in dem angegeben Be- 
reich für andere Dinge als dem SCB-Zugriff benutzt werden. 


Der SCB-Bereich ist ein Teil des CP/N 3 BLOS, der Vektoren und 
Daten aus den verschiedensten Bereichen enthält. Alle CP/N 3 
Programnteile wie CCP, BLOS und BIOS können auf den SCB direkt 
zugreifen. über bestimmte BVOS-Aufrufe kann auch aus TPA-Pro- 
grammen auf die entsprechenden Daten zugegriffen werden. 


Nicht alle Daten des SCB's sind von Digital Research bekanntge- 
macht worden, die Adressen für das BIOS sind im nachfolgenden 
Listing zusammengefaßt: 


4 ıhhARSRÄRLHRRRRRRRRKRLRRSRRBLSHRSLERLIKE KLUG ERR Ha E EEE E RE KA IE AH 
5 * t 
5 '8 rel 1.0 vom #7 01.35 4 
7 x 1 
3 !t unveraenderbarer Teıl es BIUSARM. Ayı $ 
g ;$ CP/N greift aut are Vektoren ın aıeser Tabelle zu m 4 
in ‚t nıt oem BIOS korrespomnieren zu koennen 4 
1 ‚2 Zu beachten ıst, dıe Tabelle ıst NlöHT wirkLICH unter * 
12 4 SCBSSASE zu fingen - CP/M transferiert sıe an amere L 
3 ;# Stelle - wnın 29? 4 
14 :$ Zugriff aus Anwenaerprogramme auf SCESSASE ıst daner 4 
15 ;* sınnlos. Im EIUS kann jeaach onne weiteres aut mie ı 
Ib ‚+ Labels zugegriffen werden t 
17 Di t 
18 ;$ geschrieben von RADUL Ü.KÜERBER t 
13 ;# nach Unterlagen von ÜRl 1 

fx) xx x 

2 DR 330903763959559997755559 757909475724 702 7777777779 798772797 772773 

2 

23 E37 077737777 ,7774 

24 ; Systemaaressen 

25 IB? 727773775 577777 

% 

27 public Acıvec, @covec, #aıvec, daovec, Alovec, ftnrot 

23 public #crdma, Acrdsk, Avınfo, Aresel, Arx, Ausrcd 

29 public Amltio, dernge, Merask, Mmeoia, *trlgs 

E) public Mate, Anour, *aın, #sec, ?erınp, Amxtpa 
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FERd 


FEZ2 
FE2d 
FEIS 
FE2g 
FEZA 


FESS 


sch$nase eu  WrEönM 


MLiVEC 
ACOVEC 
®AIVEC 
ARUVEC 
SLÜVEC 


SCRUMA 
WINFO 
ARESEL 
X 


} RRRERRKRFIRRESRE 
; KB-Basıs Adresse 
IB +39+7 49779379974 


Basıs ges SE 


; AASRIRRRERRERRSE 
ı DEVICE-Auswahl " (raraztar-Qlsk 
: ASEEERRRIIIRERR 


ın jegem byte kann gesetzt wergen, welcne Eimeit 

angesprochen weraen kann. SIT 15 
; BIT 4 entspricht, Einneit i' 
\ ÜRI fuer spaetere Erweiterungen 
; Die Auswani kann girekt, veger gas ? 
; BEVICE.COM erfoigen. ber Zugriff erfsiat 
; Namen im Programmteri (mAh 

















2au sentoaseriin ı KÜNSÖLE Eingane 
eu scosoaser24n ı KÖNZÜLE Ausaane 
eau sch$baseri6n ; Auf Eingabe 
eu sch$basetign ; AUX Ausaabe 
au sch$haser2än ; LIST Ausaabe 


‚ kakkzagerkkekiie 
ı BANK-Puffer \ 1# gebankten System 
BE +7 733 7777790 79°1 


aqu sch$aase+:än ı bankeo EINS) 


er 32772777 777771 
ı CP/M varıanie ; fuer BO0S 
‚ Arkatsakategantt 


eu schshase+ cn ; berzeitige MA Ayressa 

au sth$nase+ iin ; Angesprocnenes Laufwerk 

eu sch$naset#n ; E08 Varıaole "inFü“ 

eu sch$oase+din FÜR Fiag 

gu sch$base+4in ; EivS Funktion fuer Feniermeigungen 
eu scbsoase+44n ; Derzeitige USER-Nummer 

equ sch$base+4An ; Derzeitiger Miltı-Sector Zaenlar 
eu sch$oase+4En : EIS Error Mage 

eu sch$oasethin ‚ Eis Error Dısk 

eu sco$oaser5dn ı gesetzt vom EIÜS bei "open or" 
eu schöhase+h?h ; EINS Message Sıze Flag 
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FESS 
FESA 
FESb 
FESC 


FESF 


FE62 


AATE 
HOUR 
MIN 
RSEC 


?ERIMP 


AMXTPA 


ı KRARRHEKRRCHRRNG 


; Datum 
ı alt 


equ 
eu 
eu 


eu 


und Uhrzeit 


sch$nase+h&n 
sch$oaserSfn 
sch$nase+hen 
scb$dase+5Ch 


‚ ttkkgrkargntıghf 


; Aussprung Fehiermelaung 


; Kkaksrkckeggtıg 


eu 


sch$oasetäfh 


‚ kimargıatırt 
; Startadresse BOOS 
‚ Kkprkktakıkkttr 


equ 


end 


sch$baset62h 


D 
D 


; Datum ın Tagan saıt oem ] Jan 78 | 


. 
D 
D 


D 


D 


Variabie hıer abiegen 


Stunde in BÜD (Byte, r/w) 
Mınute in ECU (Erte, r/w 


ı Sekumae ın EÜD (Byte, r/w) 


; EIS Error Message um 


ı Enoe der TPA ( Start ces Bit ) 


Das B1OS-Kernprogramm, (BIOSKKNL.Z80) ebenfalls (relativ) Hard- 
ware-unabhängig, ist der erste Programmteil des B1l0S. 


Hier befindet sich, gleich am Anfang des Programnteiles, die 
BlOS-Sprungtabelle. Im B1OS-Kernprogramm werden die Sprünge in 
die entsprechenden anderen Programmsegmente weitergeleitet oder 
noch zusätzliche Daten aufbereitet. Im nachfolgenden Listing sind 
alle Routinen ausreichend kommentiert. 


Beim Kaltstart eines CP/N 3 Systems wird aus dem CPM-Lader 
(CPMLDR heraus, nachdem die Datei CPM3.SYS (das eigentliche 
Betriebssystem) geladen wurde, nach Adresse ?BOOT gesprungen und 
damit die letzte Systeminitialisierung vorgenommen. 


Es ist zu berücksichtigen, daß vom CPM-Lader heraus noch keiner- 
lei Bankumschaltung vorgenommen wurde, das Laderprogramm wurde 
vom BOOT-Nonitor jedoch ( u.U. mit Hilfe des Track-®-Laders ) 
nach Bank ® geladen. 


Ohne zwingenden Grund sollte werde die Datei SCB.Z8® noch die 
Datei BIOSKRNL.Z8® geändert werden - je weniger Änderungen 
gemacht werden - je größser ist die Kompatibilität zu anderen’ 
Systemen. 


45 


"CP/M3-BIOS s ZU ber 55 09:15 Zuasın 1.24 Fage 1 


Kernprograma 
l MACLIS DEFAULT. INC ; Einlesen Vereinbarungen 
2 MACLIB MÜDEBAUD. INC 
3 5333435539 337795577954700989904559493084379837753988979878877797 
4 ‚8 X 
5 ıt rel 1.8 vom 87.01.55 x 
5 x X 
7 ‚* Dies ıst gas Haupteadul eines EI0S fuer (Pin? x 
8 ;t mut Systenkarten aus dem NÜR-Computer Programm x 
9 ‚t Dieser Progranateıl ıst invariabel ung sollte i 
ia ‚t aoeglichst 50 belassen wergen x 
N ‚H x 
12 ‚* x 
13 ;* nach Imterlagen von DRI x 
i | ® 
15 sERSKRIKRSLENKKERRIRRRRKKKKR KH SIR S KHK RSKKERRERRRRKKRRRIKRK RR HK 
16 
17 ; 
13 ; SERKIKRRRRKERRKG 
19 ; Systemagressen 
A) ‚ Aarkktkgekkiregg 
2 
a ! Variable ım gemeinsamen RAM-Fenster 
3 L 
27 extrn  &covec,Acıvec aovec,daıvec,Piovec ; 1/0 Vektoren 
28 extrn tmxtpa ; System-Einsprung-Vektor 
fe] extrn Abnkbt ; 128 byte scratch-Futfer 
% 
3 ; 
32 ; Inıtialisıerung 
23 i 
34 
35 extrn ?ınıt ; Hauptinitialisierung und HALLO 
E) extrn ?ldcep,?rlcep ; (Nach)-Laden des CCP bei (WI-BOOT 
37 
En ı 
39 ; Benutzerefinierte Zeichen-Ein/Ausgabe Routinen 
4 : 
4 
2 extrn ?ci,?co,?cıst, ?cost ; Autrut mıt DEVICE-Nummer in <B) | 
43 extern ?cinit ; (REb-Inıt mıt DEVICE-Numner ın <C> 
44 extrn Actol ; DEVICE-Tabelle 
45 
46 ; 
47 ; Vektoren zum Diskettan-Zugriff 
482 h 
4 
By) extrn mototf ; Lautwerksabschaltung 
51 extrn Adtbi ı Zeıger auf XüPhs 
%2 public Adrv,@trk,dsect ; Parameter fuer Disketten 1/0 
53 public Arma,@dbnk ‚Acht ; dto 
[1 
55 ’ 
5% ; Speicher-Kontrolle ( banking ) 
57 ' 
5 


"CP/M3-BI0S 
Kernprograma 


59 
6 
6 
62 
53 


“ 
9 
2 
93 
9 
35 
% 
7 
Ei 
% 
10 
i6l 
182 
103 una‘ (3 Ede“ 
104 mo03’ 3 6n6C' 
105 ade’ (3 9152’ 
106 a9" C3 Bit! 
187 ac" 13 Baba’ 
108 
109 adar" 3 @aCA' 
110 612’ C3 GuBr' 
111 8015" 03 9174 
112 0613’ 13 9056” 
113 018’ 13 0034” 
114 
115 @iE' C3 0959“ 
116 0621’ 03 085” 
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public Achrk 
extrn ?xmove, ’move 
extern bank 


Uhrzeit und Datum 


D 


extern ?tıme 


; Vektor in gesetzte ( current, )-Bank 
; Interbank move ( Transfer ) 
; Auswanl (CRÜ)-Bank 


’ 
; Sonstige benurzbare Imterprogramme 


public ?pmsg, ?roec 
public ?pderr 
public ipchi 


; "print message’- "print cecimal’ 
ı "print FEHLER’ 
; ıngırekter CALL 


’ 
; Extern autrutnare Einspruenge in are BIOS Einsprungtabelle 


lic ?boot, Twenot, ?const, ?conın, ?cano, ?list, ?auxo, ?auxi 
public ?home, ?slusk ‚?sttrk, ?stsec, ?stana, read, write 


public 


"lists, ?sctrn 


public ?conos, ?awris, ?auxos, ?dvtbi,?devin, ?drtbi 
public mltıo, ?flusn, mov, ?tım, ?bnksl, ?stonk ‚?xmov 


cseg 


; Resioenter RAM-Teıl 


RERRRRIHERRRRERR RES SR ERRRRKERRRRRRRRKERRRRRRRRRRKRRHÄRRKRRLR RR AK 


+ x 
& BIOS Sprungtabelle t 
‚* 

‚* alle Ei0SRoautinen werden vom Ei0S uener aıese Sprungtabelle X 
;* aufgerufen. Bıtte beachten, nass eınıge Vektoren ın den X 
;k residenten RAt-Teıl zeigen ( Ei... .FFFF) andere gagegen x 
X auf Bank 9 ! ( mit $* gekennzeichnet ) auf aıese Bank x 
‚* wırd beim kaltstart zugegriffen. X 
Ho; + 


jp boot, 
Jp wonot, 
IP const 
Ip conın 
Jp comut 
Ip list 
ip auxaut, 
jp auxin 
Ip .hone 
Ip seldsk 
jp settrk 
IP setser 


‚ÄRKRRRIAKRERRERIeRRSRRRREKKR ERS SRERRRRRRRRRRRRRFERRRIHERRRRRRUKT 


; 4 kaltstart 

; Warmstart 

; konsole Eingabestatus 
; Konsole Eingabe 

; Konsole Ausgabe 


; Drucker Ausgabe 

; AUX Ausgabe 

; AUX Eingabe 

; %% Diskette auf Track @ setzen 
; *% Auswahl Lautwerk 


ı X% Track setzen 
; 4% Sektor setzen 
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117 00247 03 63" ?stcma: jp °  setdma 
118 0027’ 03 0979 read! jp read 
119 2A’ 3 081" write: jp write 
120 

121 020’ (3 eBkl'  Plists! Jp listst 
122 a0" 03 ME"  ?sctrn: jp sectrn 
123 032" (3 @et2'  ?cones! Jp concst 
124 0036’ (3 0157’ ?auxis! Ip auxist 
1m Ir Paunas! jp auxost 
125 

127 a3C' 3 O2’ Pavtoli ıp gevtol 


42 Disketten I/U-RAM setzen 
ix Sektor lesen 
14 Sektor schreiben 


Crucker Status 

4x log = pnys Sektor Berechnung 
; Konsole Ausgabestatus 

AuX Eingabestarus 

; AuX Ausganestatus 


nalt Adresse von Kiel 


128 O03F' 03 Oak ?aevın! Ip ?cinıt ; Baugratewecnsel 

129 na’ (3 eh’ — ?artol: jp getdrv ; halt Adresse von @TkL 

19 5 3"  mitio: Ip multıo ; 44 DD mehrfach Disk 1/0 pro Sektor 

131 048" 3 5" ?flushi Ip flush ; & Disk flush 

132 w) 


133 aaa’ CI A mv Jp ’move Block move (RAM) 

134 ME" 3 a tim: jp "time ; $% Zeıt und Datum 

135 @51’ CB OlED’  ?bnksl: jp brksel Bank fuer DM und Prograna 

136 54’ 3 MA  ?stbnk: jp setbrk Bank fuer DM und Bank fuer Programm 

137 0957' 13 Once mov! jp Ixmove extengeg INTER-Eank move 

18 

139 05a’ 3 acc jp [) 

149 0650’ 13 0000 Ip % 

141 aca' 13 aaa jp L) 

142 

143 ı 

144 on 2 23 7354335435553773577797077 7777553 77279380903850733079 2897574 

145 ‚x x 

146 ;* Begınn des Frogramateı les t 

147 iR x 

148 ‚* Das Programs wurde in (SE6 Segmenten ( resıdenter Bereich’ & 

149 ‚* und in USEG Segeenten ( gebankter Bereich ) aufgeteilt. Die £ 

158 ‚8 Aufteilung ( wanın was ) uebernimat das (P/M Programa x 
x 
t 
x 


Reserviert fuer 
spaetere Eraaenzungen 
von DRI 


151 8 GENCPN.COM 
152 x 

153 Bikkkeipssckkinkkkrkicktrankkraphkfrackkgskkknkckikirngg 
154 ' 

155 

16 aseg ; Bank # 

157 
158 H 
159 HARKRRSKRRTKREKRKKKRRKRKK KR HF KK 0) 
hardeware-Inıtıalisierung(en) 

1355539559334755955759555990 59794 


162 ; 
; RRRRERKKERKRRRTE 
ı Kaltstart 
PB > 3333594559 73557 


168 O000“ boot! 


‚ Kaltstart des Systems nachnen es von CPMLDR 
geladen wurde. Es werden keine Daten uebergeben 


m 
»n 
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175 0a" 31 an’ la sp, boot$stack ; Stack inıtıalisieren 
176 

177 i 

178 ‚ Iatrkrckkartakke 

179 ı hardware-Inıt 

199 ‚ Astskkyigkirrgkt 

181 i 

182 ; inıtialisierung alier Einheiten, are nıcht bereits 

183 ; vom Monıtor inıtialısıert wuroen, AUSSER Dısk- und 

184 ; Zeichen ( Charactr ) 1/0 

185 ı z.B. sott/hardware-ihr 

186 ’ 

187 

188 ud" CD Ann call ?ınit ; hard ınıt 

189 

19 i 

191 ‚ ektirkkktriktr 

192 ; E/A-Init ; Nur Zeichen Ein/Ausgabe 
193 ‚ kxkktktkpkegaeng 

194 ; 

195 

196 an" BE Br ld c,15 ; INiT aller i6 moeglıchen GEVICES 
197 

198 mg" esınıtslaop: 

19 

Zu a" 15 push be ‚ retten von (, oem Devicezaenler 
2) 09" CO call cin ; einzelne Devices inıtıalisıeren 
202 rc" 1 pop be ; Devicezaenler 

203 00” 40 get c | 

264 Ge FZ Gm" ’p p,c$inıtslaop ; Schleife dıs fertig 

245 

206 ' 

27 ; ARRIERERRERRIHTT 

268 ; DISK-Inıt ; Imitialisıerung von FOC’s 
209 ‚ karkatapsirıkeie 

218 ’ 

2a ; Imtialisierung alier (implementiarter) Laufwerke 

212 ; Ü siehe auch dort ) - Welches Lautwerk als implementiert 
213 ; betrachtet wird stent ım Programateıl DRVIEL. 

214 ; Nur was dart eingetragen ıst gılt als resıdent. 

215 

216 all" 96 1 la b,16 ; 16 Laufwerke (moeglich) 
217 0613” 21 One id hl,&dtbl ; Zeiger auf XDPH-Vektoren 
218 

219 16“ asınıt$laop: ; Inıtschleife 

224 

221 016° (5 push be ; Schleifenzaehler retten 
222 0617” SE id e,(hl) ; Zeiger auf XDFH einlesen 
223 mad" 23 inc hl ; nach DE 

24 19” 56 ld 4,(hl) ; 

225 ala" 23 inc hl 

226 iB" 78 ld ae ; fertig wenn D£=4 

227 ic” B2 or d ; = keın weıteres Lautwerk 
228 0610" 28 OF jr z,inıtsnext 

229 ir" E5 pısh hl ; rette Zeiger aut @atol 
220 9029" E5 push hi ; gleich 2% 

231 21" EB ex e,hl ; HL= Adresse XUPH 

232 22" 28 ec hl ; HL zeigt auf TYPE 
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233 23 

234 0624" ZB 

235 25° 56 

2 06 ZB 

237 027° SE 

28 028" EB 

229 0929° O1 

240 DO2A” CD ia" 
241 Aa2b“ EI 

242 

243 unde® 
244 

245 Au2k® C 
246 War" ih 
247 Gu3l® C3 ne" 
243 

243 

254 





259 u" CD 78° 


je 


3 


275 
276 OL’ 31 ankz' 
277 @6F' CD 6078 
278 
279 
2 
281 
222 
233 0072' CD Ren 
234 8075’ 03 0199 
285 
286 
237 
258 
239 
2 
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ec Ai ML zeigt aut Wil 

gec nl ; HL zeiat auf HIGH int 

la a,(rl) 

gec hl ; HL zeigt auf Lö Inıt 

id e,(hl) ; Agresse oer Lü-Inıt in DE 

ex ge.nl ı ML=inIT 

pop bp} ; Desleiger aut XLen 

eali  ıpeni : INIT ges Laufwerkes ausfuahren 

pop hi ' urıgınal Zeiger ın &stol 
Zsınıtsnext! ; Senleife 

pop ec . Zaenler 

aını ; Schlaife ora Laufwerk 


ats}! 





; weiter In resıigenten Rir-Teri 


cse3  resizentar här-Teıl 


} ABIRÄRLIRIERRRRHRARRRRRRRLI HER 
; Systen-sottware-Inıtialısıerung 
5 RRRLHRLSITERRRURERRRRÄRRRRRRERTR 


D 


call  sets;umps ; UrP ber 8 und 5 Int 


i 
‚ ab nıer haben wır aut cıe TFA-Bank (tank 1) geschaltet, ! 


call  ?iscep i ... und CiF lagen 

Ip ccp exit nach CCP 

: ARKERRKERRREKHIK 

; Warnstart 

De 350335 735597774 

ld sp,bmt$stack ; Stack auch beı Warnstart 
call  setsjumps ; JUMP bei 9 und 5 setzen 


: ab hıer haben wir auf Bank 1 geschaltet 


call ?rlecp ; CCP nachladen 

IP ccp i ... umd ausfuehren ... 
; 13355575393565797 

; Kılfsprogramme 

DB >03559655599579 4 
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29 
292 0078’ 
233 


294 
295 
2% 

297 

238 

233 FFFF 
Er el 
32 WTA" CO W651 
3 

34 

#5 

6 TU 13 
307 Bar’ 32 000 
2" 32 RS 
399 0’ 21 
31a Mass" 22 anal 
311 00’ 2A OA 
312 MeBE’ 22 O06 
213 91’ (9 

314 

315 

316 

317 

313 

219 

324 

Erd Pa 
322 

2323 [2.720 
324 

325 

3% 

37 

38 

323 

39 

32] aae2' 21 Beck 
332 085’ (9 

32 

334 ER" ZI Ok 
335 0069’ (9 
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set$ jumps: 


if 


entf 


; inıt cer UMP-Into bei Aoresse # und 5 (CF/M Einsprung) 
: in gebankten Systemen wırd jetzt auf are IPA-Bank geschaltet 


banked 

la a;] 

call ?bnksi 

Ib} ER.) 

ld (9),a 

1d (5),a 

1 hl, ?wonot 
id (),hl 

id hl, (tmxtpa) 
ld (£),hl 
ret 
133777594777577 77 
; Bontstack ... 

‚ kttskkiptesiktee 
as 2 


bont$stack eu $ 


cevtol! 


getdrv: 


D 


; wenn gebankt 


; Bank | Laden ( TFA) 


Jump Instruction 

nach # und 

nach 5 laden 

warmstart weder (BIOS 

nach I ( @=JP ?EooT ) 
Einsprung in's BÜOS steht dort 
nach & ( S=JP Eins ) 


16 & push 


; 16 % guerfte genuegen 


KREREHERRERRRRRRR ER ERROR KcKR RK 


SRERRRRERRRRRRRKRRRERRRRRRRRE RAR 


: Adresse oer DEVICE-Tabellen lesen 


id hl,ectol 
ret 
la hl ,*otol 
ret 


1305539375355 777 
Konsole 
aıkkıtirikr 


; Startadresse der 
» CHARACTER DEVICE Tabelle 


Startadresse der 


; DRIVE-Tabelle 


157393353357734349979999944993 907 
logısche Zeichen-Ausgabe 
113955 235999559999574977 379409473 


Der physikalische Zugriff erfolgt erst in CHAkld.Asa 
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35] aka‘ conaut! 


Ausgabe nes Zeichens ın (C> an ALLE angewaeniten 
; konsalan-Ausgabeeinneiten 


an 
= 


358 werd’ 2A emck id hl, (&cavec ; Zeiger aut Ausgabe Eil-Vvektor 
359 weh’ 13.63 jr autsscan 


‚ haaskaaschagrrrk 
3% ; AUX 
DB +39935375557773 3 


367 ach’ auxaut! 

2363 

39 ; 

374 ; Ausaabe aes Zeichens ın (C> an ALLE angewaehlten 

27 ı AuX-Ausgabeeinheiten (was auch immer das Ist) 

372 ' 

373 

374 WuBE' 2A ann ld hl, (daovec ) ; Zeiger aut AuX Ausgabe Bil-Vektor 
375 Mc’ 1303 jr autsscan 


; ı4ttttaklakerck 
37 } Drucker 
 kskkkkekirkakkt 


383 cd! list: 


; Ausgabe nes Zeichens ın {C> an ALLE angewaehiten 
397 ; LIST-Ausgabeeinheiten (ürucker) 


3 Mc" 2A ee ld hl, (Alovec) ; Zeiger aut LIST Ausgabe EIl-Vertor 
392 a7’ autsscan: 


395 Schleife zur Abtrage welche Eimeıt bereit zur Ausgabe ıst 

3% ; Aktiviert ist dıe Einheit fuer are ein BIT ıa entsprechenden 

397 + SCB-Vektor gesetzt ist. Bıt7 entspricht dabei DEVICE # und Bıt4 ist 
38 ; GEVICE 11. Bıt @..3 ıst von CP/M reserviert 

39 Das Setzen der entsprechenden Startbeaingungen wırd in ?INIT 

409 ; vorgenommen ansonsten von DEVICE.COM 

4a] ; Auszugebendes Zeichen in <C) wird in <A» zurueckerwartet 


4oh CT" 6 0 ld b,& ; Start mıt Einheit # 
465 
406 809‘ co$next! ; Schleife 
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467 

4er et 8 
409 3 
41a en‘ 5 
all a’ [5 
Lip; 

aid ünk' 

414 

415 Be‘ CD ala3' 
4ih Waul' 87 
Tem 28 FA 
413 Mood’ Cl 
419 uns’ (5 
4 CO A 
42 ru 
422 Boa’ EI 

23 

24 

425 

als Walk" 4 
AT WC" TC 
28 0000‘ E5 
49 BR0E’ 20 EI 


452 Wn2' 2A Oo 
453 HieS' 18.98 
454 

455 

456 

457 

453 

459 

469 

461 Bir7' 

462 

463 

464 
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add hl,nl 
Jr nc,mtsoursmevice 
pusn hi 
pusn be 
mattautsreaay! 


call  coster 


or a 

Jr zZ, mtäautsreacy 

PP br 

push De 

call  ?co 

op be 

Pop hi 
matsaut$device: 

Inc b 

14 a,n 

or l 

Jr nz, co$next 

ig a,C 

ret 


canost; 


auxost: 


Ausgabestatus 


tkhatgabsakshtzr 
konsole 
ArSHhrhAFkIEKEE 


hrssshsgsktstätkiiuhtshkehtigete 


Aarkpkarspisgpkätitehstiticheeee 


rach lınks scrieben MSs in CAhnY 
wenn DEVICE nıcht angesprochen .. 
sonst EIl-Zeiger retten 

und Einheit-Nummer ( ın (8) 7 


warte bis Einneit bereit 

FLAG i# = inacnı NICHT bereit) 
Schleife bıs derait ... 
Eimmeit-Humner zurueck und erneut 
retten. Auszugebendes Zeichen ın (C} 
Ausaabe auf Devıce, Nummer ın <B> 
Eınheit-Mmner umd Zeichen 
BIT-Zeiger 


naechste Einheit 
Fertig? - gann inL>=h I 


sonst weıter 
Zeichen zurueck ın <A> 


ı konsolen-Ausgabe- Status, <A>=FF wenn alle angewaenlten Ausgabe- 
; Eimneiten bereit sınd, sonst <A>=a 


ld hl, (dcovec ) 
jr ost$sscan 


tttkkkkkkghhrk 
AUX 
Atrttshtkgtkhrng 


: AX-Ausgabe-Status ... 


Zeiger aut kansolen EIl-Vektor 


wıe CONOST fuer AUX 
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465 

465 

Ar One" 2A Ondndik 
4r3 Buch’ 13 03 
4:3 

478 

47i 

472 

473 

474 


475 ancl lıstst: 


432 Wel' 2A ehe 
433 


ia 


; LIST-Ausaane-Status 


lg 


454 ER" ost$scan! 


435 


4 
49] BRrF' ik Oi 
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hi, (8aovec ) 
nstsscan 


Agspthttkikkitte 
Drucker 
1353937577577 777 


hl, (8iovec) 


D 


Zeiger aur Al EIl-Vartor 


wie CONGST fuer LIST 


Zeiger aut LIST Eii-Vektar 


; Schleife zur Abfrage welche Einreit fertig ıst 
; ( siehe hierzu auen Tisscän ) 


ig 


493 cas$next! 


45 rl 29 

435 MR" E5 

497 wer3' (5 

433 Bord’ DC 6163' 
43 EC 

5 Bar’ Ei 

Sal dut3' 87 

5a2 Mara’ 13 

sa3 @0rB' 04 

Sad BOFC' 7C 

505 WurD' BS 

Shb BUFE' 20 Fi 
547 ala’ F& FF 
593 6192° C9 

EL) 
511 

512 

513 

S14 

515 

SI6 ala3" coster! 
517 

si8 

519 

52 

521 

Ey73 


54 


acd 
push 
pusn 
call 
pop 


be 

c,caster 

be 

hı 

a 

Z 

b 

a,n 

l 
nz,cos$next 


KRIRKRKKERKERKRE 
Kılfsprogranne 
133957959 57393 934 


‚ Start mıt Einneit # 


MSE nach CAhkY 
BIT-Vektor retten 
Zaehler aucn 


' pruefen ob fertig wenn DEV seiektıert, 


; Zaenler ... 


BIT-Vektor 
. war DEVICE fertig ? 
NEIN ... zurueck mıt & ( falsch ) 
sonst DEVICE-Nummer +1 
pruefen ob fertıg 


Schleife bıs alle DEV angefraat, 
alle selektierten waren bereit 
also AfF ( true ) 


pruete Ausgabeeinheit ob BEREIT ( incl optionalen XÜN/XOFF ) 
erwartet aıe Device-nummer ın B> 
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523 183" 68 id 1,b ; DEVICE Nummer 

524 e104’ 26 00 ld h,® ; als Gffset in Tanelle 

525 alö6' ES push hl ; ütfset retten 

5% Bi and hl.ni 22 

ra 29 a2 nl,ni X 

3 ayd hl.ni 28 

5 en 1 a la oe, Actoiet ; Tanelle Ü nach Devıca-Nanen ) 
55 19 ED} ni,ge ‚ üffset 

531 @iae' TE ig a,{nl) ; lese TYF 

532 Giar’ c6 19 and mosxonsxoff ; AON-AUFF Protokoil ? 
sa’ El pop hi ; ütfset 

534 6112’ CA Ola Ip 2, 'cast ; kein XÖW/XUFF-Status aırekt noien 
535 

5% i 

537 lesen mıt XGN/KürF Protokoil 

[x B 

533 

548 all5' 11 Mir3' id ge,xottlıst 

541 118’ 19 adl hi,oe ; Zeiger auf richtigen XÜN/IÜFF-Fiag 
542 119° CD a13B' call cist! ; Status lesen 

543 AllC’ 7E Ib} a,'hl) ; XON/ÄOFF Flag 

544 aid“ CA AldYy' call nz,cıl hole FLAG aoer lese Eingane 
545 129° FE II cp ctig 

546 Ai22' 2002 jr nz,nat$gq ; wenn CNIRL-Q, 

547 0124’ 3£ FF 14 a,-] ; aann READY lag setzen 

548 

549 Ali" FE 13 mtsa! cp ctis 

55 Mel Ir nz,mt$s ‚ wenn CNTRL-5 

S51 Ml2a' Ar xor a ; REAUY-Flag loescnen 
Shi 7 motss: id inld,a ‚ Flag retten 

553 alt call castl ; aktuellen Ausgabestatus lesen 
55 am in!) : naskıieren mıt CNTRL 0/5 Fiag 
555 [9 ret 

556 

557 al5l' cal; 

558 

559 ; 

SH ; Ausgabe ueber “A> mıt <DEI,SEL> uma ÄHL> gerettet 

Sal : 

Sh2 

583 0131’ (5 push be 

564 9132" E5 push hl 

565 0123' 05 push oe 

566 0134’ AF id c,a 

567 0135’ CD ac call ?com 

53 913° DI POP ge 

569 0139 18.13 jr ci2 

578 

sa cıstl: 

sn 

573 i 

Eu ‚ Eingabe-Starus mıt <BC) und {HL> gerettet 

57 r 

576 

SIT 18" C5 push be 

573 #1’ ES push hi 

579 @130° CD Omi call ?rist 


539 0140’ 13.6 jr ci2 
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58] 

582 aa2' costl:! 
533 

584 

535 

SE 

597 

588 ald2' C5 

539 4143’ E5 

5 aA CD Baer 

591 6147’ 18 65 

532 

593 6149° al! 
594 


54 

599 0149’ C5 

bha MIAA' E5 

Kal ala’ CD An 
662 WIAE' EI cı2: 
693 Aldr' Cl 

c04 #158’ 87 

£05 951’ C9 

607 

608 

619 

611 

612 

613 

51a 

615 

6l& 

617 

618 

619 052° const! 
69 


626 0152" 2A Oak 
627 6155’ 13.03 
628 

629 
6% 


633 
634 
635 0157° auxist: 
63 
637 
68 


56 
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; Ausgabe-Status mıt <öC) und ÄHL> gerettet 


pusn be 
pusn hl 
call cost 
Ir cı2 


; Eingabe mıt <BL> und (HL) gerettet 


pun be 

pusn hl 

call ca 

Pop hl 

pop be 

or a ; Setze Fiags (fuer Status) 
ret 


5 ARRSKSRRKEERRRRLÄRSRÄRFRÄRKR ARE 
; Eıngabestatus 
‚ teaktckkkgckekekkhkepkkrekkkinn 


: Aasshrrakäättake 
; konsole 
; ARaSEgRKKHKAKEE 


; Konsolen Eingabe-Status. <A>=FF wenn das erste DEVICE 
; bereit ıst, sonst (a)=60 - [ wer zuerst komat ...... ] 


ld hl, (@civec) ; Zeiger aut CöN-Status BIT-Vektar 
jr ist»scan 


| Srtemigrkiakte 
; Au 
; KHAKEAEEENIE 


AK Eingabe-Status ( sonst wie CONST ) 
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639 ; 

648 

641 A157’ ZA Ania ld hl, (@aıvec) ; Zeiger aut Mik-Status Bil-vektor 
642 

543 15 ıst$scan: 

644 

E45 id D,8 ; Start mıt DEVICE & 

hd 

647 All’ cis$next: 

648 

649 abc’ 29 aod hl,hi ı MSb von BIl-Vaktor ım CAkkY 
659 5 ld 2,0 ; Annenmen DEV ist nıcht fertıg 
651 br DC AR call c,cistl ; veherpruete Status wenn DEV vorhanden 
652 #162’ B7 or a ; Fiag setzen 

653 0163" C$ ret nz 1... Ok DEVICE bereit 

654 4164’ 04 inc b ‚ naechstes DEVICE 

655 @165' 7C ld a,h 

656 W166’ B5 or l ; fertig ? 

657 167° C2 O15C' jp nz,cis$next i ... wenn nıcht ... sonst Schleife 
658 HikA’ AF xor a ı Ast begeutet nıcht fertig... 
659 A168’ C9 ret 

660 

661 i 

662 +5 7549797795933573 4477057377775 

663 ; Zeicheneingabe 

k54  RERRERKRRERRIERRERERRRK RR ek 

665 i 

666 ; 

667 ‚ Maxgckrrrtapite 

568 ; Konsoie 

669 ; kkkkckkkkankkise 

676 ; 

671 

672 AlEC’ conın! 

673 

674 f 

675 ; Konsolen Eingabe 

676 ; Bringt Zeichen vom ersten fertıgen DEVICE zurueck in <A» 

677 ; Es wird mıt jeaem Aufruf nıeses Programasegmentes gleichzeitig 
678 ; der Lautwerksnotor abgeschaltet 

679 ; 

689 

581 Bl CD a call mterf 

632 

6 AAF’ 2A Ok ld hl, (&civec) 

634 6172’ 18.03 jr insscan 

685 

686 ; 

637 ‚ Aakkakkkkckkak 

68 B 

639 ‚ kegskkkttigkirg 

6 i 

691 

692 0174' auxin: 

693 

694 : 

695 ; AUX Eingabe 

6% ; wie conın fuer AUX 


57 
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697 
698 
649 M174' ZA Ant 
To 


Tal @177' 
12 
703 0177’ ES 
Toa 6178’ 06 0 
765 
Tas A17A' 
767 
Tag 17a‘ 
793 a178' 
19 alu 
711 0139° 87 
n2asl' 20 08 
713 0183' 44 
714 034° TC 
715 6135’ B5 
16 0186" ZU F2 
N78' E 
18 0189° 18 EC 
719 
Ta alsh' El 
721 0196’ 03 Wodke 
722 
723 
724 
25 
726 
27 
728 
73 
7 
731 
732 
733 
734 
735 Q18F' 
7% 
737 
73 
73 
749 
74 
742 AlEF' 
143 
744 QlSF' TE 
745 61%’ E6 7F 
746 0192' 87 
747 993° 08 
748 0194' CD @131’ 
749 0197’ BE 
750 01%8' C9 
751 019° 23 
752 019A' 18 F3 
753 
754 


Sm 
3 


58 


id 
in$scan: 


push 
ld 


cı$next: 


ad 
id 
call 
or 
jr 
inc 
ld 
or 
ir 
pop 
jr 


cı$ready pop 
IP 
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nl, (Rarvec) 


hi,nl 

2,9 
c,cıst] 

a 
nz,cı$ready 


a,n 

l 

nz, cı$next 
hl 

In$scan 


hl 
"ci 


Abtrage ch bereit, 


Rette EiT-Vektor 
Start mıt DEVICE 4 


Schleife 


Me ım CARkY 

2-Fiag fuer unoeleate Devices 

hat DEVICE ein Zeichen vorliegen ? 
Setze flags 

JA, Zeichen liegt vor 

naechste Einheit 

... oger bereits fertig ? 


wenn nıcht, 
‚ aut orıgınal Bit-Vektor... 
i ... alles von vorne bıs Zeichen .. 


AKKRHERRRRRRRRRRERRRRRRRRRKRRRIK 


tktgskhinkehttkkptshkhakkhkkeng 


’ 
; Nutzbare Interprogramme 


oder Bit? gesetzt - <BC) und <De> gerettet 


: Ausgabe eines Textstrings ab (HL) bıs (HLI=%O 


‚ kaakskkrghkktegg 
ı Stringausgabe 
 KagkskkttakkrrgK 
?pasg! 
pasg$loop: 
ld a,(hl) 
and Tih 
or a 
ret z 
call col 
cp (hl) 
ret nz 
inc hl 
jr pasg$ loop 


; Schleife ... 


; Zeichen einlesen 

; maskiere Bıt 7 

;@? 

} ... dann fertig 

; an Ausgabeeinheit uehergeben 
; gleich? 


...venn Bit gesetzt dann ungleich... 


Zeiger auf naechstes Zeichen 
; Schleife bis Text ausgegebenf 
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755 ; kippen 

756 ; Zahienausgabe 

757 ‚ kakztexkkttetttr 

753 ; 

759 

768 AK Ipdec! 

761 

162 ; 

763 ; Ausgabe eıner Zahl ın (HL> 

764 ; im Bereich #...65555 in bınaer 

765 s 

765 

767 a19C' @1 albc“ ld be,tablele ı Im'rechnungstabelie' 
763 01’ 11 08F6 ld de, 1a ‚ Start mıt zehntausender ... 
KIA EA next: Id a,'%-] 

77a MiA4’ E5 pderl: push hi ; Zahl retten 

NA x ine a ; hechzaehlen Zahl in Akku 
712 616’ 19 add hl,de ; bis ausserhalo (DE) 
773 0A 39 a4 jr ne ‚stoploop 

774 9189 3 inc sp ; Ausgleich pusn H 
TSOM 3 inc sp 

TI6 WIR’ 18 F7 jr paecl 

777 

778 @1A0° stoplaop! 

773 

79 BAD’ CD 131 call cal ; Zeichen soweit, ausgeben 
78\ 

782 ib‘ nextangit! 

733 

734 9169" EI pp hl ; Zahlenwert ruscklesen ( soweit ) 
735 #iBl’ MA ld a,(be) ; Vergleicnswert aus Tabeile 
7% @1k2' 5 ld e,a ı nach <0£> einlesen 

737 niB3' 03 inc bc 

783 0164’ AA ld a,(be) 

739 #165’ 57 id d,a 

79 als’ 93 inc be 

791 #187’ 7R ld a,e ‚ evtl schon fertig ? 
732868" B2 or d 

793 189’ M E7 jr nz, next, } ... wenn noch nıcht fertig ... 
794 ai68’ (3 ret 

735 

7% BiBC’ tablei@: 

797 

78 ' 

79 ; Um’rechnungstabelle’ 

2 i 

2] 

802 alec’ FEIB FFC dv ea, -190,-18,-1,0 

393 

294 ’ 

345 ; Skpkkkkkatgkkr 

26 ; Fehlerreldungen 

37 > RRRREKRRRRRKRKE 

Er H 

599 

810 AlCh' ?pderr: 

ER) 

82 i 


59 
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813 

314 

815 

gi6 alle" 21 237° 
817 0169’ (0 Hi’ 
EIS @lCC" ZA BiFF’ 
319 HICF' Ch Al 
528 il’ CD A131! 
321 0104’ 21 uB4” 
822 0107' CD AlEr’ 
323 6idA’ ZA H2uR' 
824 aid’ CD 91%’ 
325 bich' 21 AnEs" 
826 Bird’ CD Alsr 
327 GiEh’ 2A 6202’ 
223 01EI' CD SC 
329 GiEC’ C9 

2 

831 

332 

333 

234 

235 


3 
337 AltD‘ 
28 
240 
341 
2 
243 BikD' 32 
344 Gira" 13 Be 


882 eiF3' 
353 

854 

855 

856 

867 

358 

859 

30 

861 

%2 
863 

364 GiF3’ FF 
865 @lF4' FF 
$66 HIF5' FF 
867 @lF6' FF 
868 GIFT' FF 
869 AlFd’ FF 
870 O1F9’ FF 


60 


>Pppo>ob>D> 


; Fehlermelaumgen (BINS-ERKÜR) 
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Fenler 'Kapt' 

sangen 

aktuelle Lautwerksnummer 
in A... P wangein 

sangen 

aanach TRAUK-Nummer 


ın becinaL 
gesat. mit SERTÜR-Nummer 


; bankselect - Auswanl ger CFu-Bank fuer weıtern Frogrammablaut 


ld hl,arıvesmsg 

call ?pasa 

id a, (ddrvo 

ad a,'A' 

call cn) 

id ni, trackiasg 

call  ?pmsq 

id hl, (tee) 

call ?poec 

id hi, sectorsasa 

call ?pasg 

ld ni,(dsect) 

call  ?pmer 

ret 

BE 37355733577 777 77 

; Eankselect 

+33 7375739557577 
brksel: 

14 (Achnk),a 

IP ?vank 

15579559955577 777 

ı KÖN-XOFF Tabelle 

‚ Arkkpkıkkkkkktgr 
xotflıst: 

: CNTRL-S nacht 9 aus FF 

rpt 12 

& -] 

encm 

ob -1 

[.) -] 

b.) -] 

& -] 

db -] 

& -] 

db -] 


; als momentan Bank speichern 
‚ aann Bank anwashien 


RAM-Sıaulatıon des Ein/Aus-Status bei XÖN/ÄÖFF Protkoll 


; nur 12 Devicees moeglich ! 
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871 Bra’ FF A & -} 

972 #iFB’ FF A db -] 

873 QiFc' FF A do -] 

374 SFD' FF A b») -] 

875 AiFE' FF A & -1 

376 

877 258g ; weıter ım Bank ö 

378 

879 i 

67) ı tgrkikkrckkgsigkksuekkktätkichk 

E31] » DISK 1/0 Interface koutinen 

2 ‚ Aaganpptskpharkikkärschtarsschk 

283 i 

3 ; 

685 ; In diesen Programsteılen wıra jehien NICHT physıkalısch 
5 ; auf oıe Layfwerke zugegriffen . 

637 i 

33 

889 ; 

9 IE +73 7375577379774 

39) ; Diskselekt 

392 ‚ kkkkagkarckekirk 

833 i 

394 

395 034° seldsk! 

3% 

897 ; 

393 ; Anwan eines Laufwerkes. Laufwerksrummer ım (C> 

839 ; Veranlasst LÜSIN wenn erstmals angesprochen 

6] ; Bringt ın <HL) Adresse oes DPn's zurueck ılısk Parameter header) 
El ; Ist BIT 4 in DE=# verlangt (F/M eın erneutes Login 

#2 ; ( z.d. nach Diskettenwechsel > 

we} r 

4 

WS 934° 79 la ac ; Laufverks-Numner nach <A> 
ob 0035" 32 HIFF' ld (Ayrv),a ‚und in RAM abiegen 

7 3" 69 id Lie ; ganach Mamer im im? 
wa 0039" 26 ld h,& ; kopieren 

re 29 ax hl,hi ; %2 Ingex in X0Pr-Tabelle 
RX” a ER 1d be,#asbi : Zeiger in Laufwerkstabelle 
1 9 E%] hl,be ; errechne Adr des XÜPH fuer Laufwerk 
912 Ma" TE ld a,(hi) 

913 @04)” 23 inc hl 

914 9042” 66 ld h,(hl) » XoPH-Adresse nacn HL 

915 Ada" BF Ib] l,a 

gI6 0944” B4 or h ‚ Laufwerk "vorhangen’ 

917 wand" Cc8 ret zZ I .... nein, nicht implementiert 
912 #046” CB 43 bit 9,e ; LOGIN verlangt ? 

19 Aaas" CH ret nz i ... wenn bereits seiektiert 
329 5049" E5 push hi ; Rette Adresse nes XOPH 
921 aada" ER ex ‚nl ; ... auf Stack und in <Dt> 
922 #a4B” 21 FFFA 1d hl,$ ; Berechne Zeiger auf LÜGIN 
923 Mad” CD ah“ call  getadr 

924 OST" CH aaa” call  ipchl ; LOGIN ausfuehren 

925 0054” EI rap hl ı XUPH-Zeiger 

9265 0055" (9 ret 

97 


Erc i 
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929 ‚ kauckkktegiitrer 
; Höhe 
ER) ‚ Akastktgggateeig 


24 is" ‚he! 


497 ; veranlasst 935 Laufwerk (nacn Änsprache) aut Tnälk # vorzu- 
‚ gefahren, yamıt gie Stellung aes Schreib/Lesekopfes 

49 ; bakannt ıst 
’ 


942 056" Al A ia be, 


3373377349347 9 04 
; Track setzen 
me 3377777777743904 


“ ci 
IISrL 


ER settpk! 


’ 
43 i Die Varıable (ATRK) vırd mıt der gewuenschten Track-kunmer 
954 = in «BC) - ueberschrisoen. Inese Track-Nunner wırd bein 


455 ‚ naechsten physikalischen Zugriff auf eın Lautwerk angewaenit 
356 ; 


353 69" ED 43 200° 14 (&trk),be 
959 4450” 09 ret 


Altsatekkrtıkigd 
Sektor setzen 
%4 13335 77555979497 7 
5 

%6 

37 @NSE* setsec! 
%3 

463 

979 

971 

92 

373 @uSE* ED 43 0202 ld (dsect),be 
974 B062" (9 ret 

95 


ı wie SETTRK jemoch fuer aan naechsten Sektor 


kirstgpekktrttkt 
RAM-Adresse setzen 
tikkekkakktitehe 


2 0063" setcma: 


die RA-Adresse wo der naechste Saktor hıngelesen wird, wırd 
in der Variabien (®DMA) abgelegt, Vebergabe nıeser Adresse 
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997 

bo) 

989 

Eu] 

3a ae" ED 43 004° 
392 007" A 0 
ERE} 


Tine GREA“ setonk: 


1007 ancA" 32 0207’ 
1098 Aa6D” 19 
1009 

1816 

1611 

1012 

1013 

1014 

1615 

1e16 wise” sectrn: 
1617 

1a18 

1819 

1026 

102 

1022 

1023 

1924 

1925 

1026 

1027 nee” 69 
1028 BO6E” 60 
1029 079° 7A 
1030 9871” 83 
1931 0972" (8 
1932 9873" EB 
1033 074° 09 
1034 0675” GE 
1835 0976" 26 @0 
16 8978” (9 
1037 

1038 

1939 

1048 

1941 

1942 

1943 

1044 0479” read! 
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in <BC). hleıchzeitig wırd SEK (Bank wohin geschrieben wırd) 
als ®CENK (Bank mıe gerane angewaenit ist) selektiert. 


Ib} (Romaı,be 
id a, (Achnk) 


Ahastphitrgkettt 
Bank waehlen 
1373357977755 7757 


; setzt Varıable Kiki Bank wanın geschrieben wird ) aut oen 
; ın <A) uebergebenen Wert 


ld (Adırk),a 
ret 


kakkrkkkkakhiskt 
Sektor SKEW 
ttktrekkhtikkkst 


; Berechnet aus ger logischen Sartar-kunmer dıe physikalische 

; Sektor-Nummer ( falls SKEw vorgegenen !). Logiscner Sektor 
{wird in <EC> webergeben, physikalischer Sektor ın <HL> zurueck- 
; erwartet. ist Seew=d wird wer log-Sektor als pnrs-Sektor ueber- 
; geben. Der Index ın aıe SreW-Tabelle ÜlLToc) wird in DE ueber- 


id IM: ; Kopıe nach HL 

1b] h,b 

ld a,d ı Sebwad ? 

or a 

ret, zZ ; dann fertıg 

ex Je,hl ‚ sonst Gffset in SKEW-Tanelle 
ax hl,be ; berechnen 

id l,(hld ; und Wert nach HL 
14 h,d > SkEw nicht > 255 | 
ret 

i 

 keakpkkakkrkeree 

; Sektor lesen 


‚ kkkikkıriktpeee 


63 
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1945 

1946 

1847 

1943 

1443 

1954 

1051 673% CD ana" 
1052 @a7C® 21 FFFS 
153 7" 18 66 
1954 

1455 

1055 

1987 

1853 

1453 

1969 

Tas uns * 

1062 

1063 

1364 

1065 

10.13 

1967 

163 as” CD aa" 
1969 0094" 21 FFF& 
1970 

1871 37° 

1972 

1473 

1074 

1075 

1976 

1977 087° CD a0sk“ 
1978 8A” &9 

1879 

1688 

1981 

1992 

1083 

1634 

1085 

1086 RB“ 

1987 

1088 

1689 

106% 

1631 

1092 

1093 

1094 @A86“ E5 

1695 ABC” 2A HIFF’ 
1096 ARSF" 26 00 
1097 991” 29 

1098 92° 11 Oak 
1099 0895” 19 
1100 0896” SE 

1101 0097” 23 
1102 0" 56 


64 
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; halt aus gem XGPH gie Ägresse der gqueltıgen LESt-Routine 
; und springt mıase an 


call getan ; male Agresse ges YÜfH 

id nl,-3 ‚ hffset zum Leservektor 

Jr PWELOEON ‚ dann austuehren 

i 

‚ kaakkagakkarakek 

; Sektor schreiben 

‚ Atkpasckkrskaker 
write: 

; halt aus dem KufH aıe Adresse ger queitigen SCHRLIE-Routine 

‚ und springt aıese an 

call  getam ; Hole Adresse ges ILrn 

ia nl,-ie ; Gffset zum Schreiovektor 
Pwscommon: 

; gemeinsamer Programmteıl READ/URITE ausfuenren 

call  getadr ; Adresse der Funktion 
ıpehl! jp (hl) ‚ Ausfuenren REAO oner WRITE 

5 RRERKKRRSKRERERK 

; hılfsprogranme 

3373335599975 7%4 
getdph! 


berechnet nach der Lautwerksnummer in der Varıablen (8URV) 
; dıe Adresse des entsprechenden XDPH und uebergibt dıese 
ı Adresse in <DE> 


push hl ; Benutzerregister retten 

ld hl, (@arv) ; Laufwerksnummer 

ld h,@ 

add hl,hl HR 73 

ld de, Autol ; Zeiger aut Lautwerkstabelie 
add hl,ge 

ld e,(hl) 

inc hl 

ld d,(hl) 
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1103 0499“ El pop hl ; zurueck Benutzerragıster 
1104 WA” C9 ret 

1185 

1106 aaa? getadr! 

1197 

ag aaa” 19 add nl, 

1199 0636" TE ld a,(hl) 

1110 000° 23 ine ni 

1111 90%” 66 ld h,ini) 

112 A09E® Er la l,a 

1113 AaA9” C9 ret 

1114 

115 i 

1116 ; BRRRRIERRRIRRRK 

117 ; (De)-Elocking 

1118  Arckkkakkekkrckt 

1119 i 

1120 

121 AaAl“ multio! 

12 

1123 ; 

1124 setzt Sektor-Zaehler 

1125 ; wenn dıe Sektoren groesser als 122 byte (Stangard 
1126  CP/M) sind, wıe dıes bei moppeiter Schreitmichte (ad) ueblich 
1127 ; ıst. Das Blocking ung Deblackıng wıra entsprecneng der 
123 ı Sekkorgroesse von (P/M uebernommen. 

123 ; Vebergabe ın <A) 

119 : 

nal 

1132 Al" 32 0206’ la (dcnt),a 

1133 094” C9 ret 

1124 

1135 i 

113 ‚ sakakkakkkkkrrer 

1137 ; Flush 

138 ‚ kagaekkaskkkiree 

1139 i 

1140 

1141 aaAs“ flush: 

1142 

1143 i 

1144 BIOS blocking buffer flush 

1145 ; NICHT IMPLEMENTIERT CP/M vebernimat blockıng/aetlockıing 
1146 i 

1147 

1148 AaAS" AR xor a ; Fehler 
1149 Mas” C9 ret 

1159 

1151 s 

1152 ; kekkkkkkkrieg 

1153 ; Fehlertexte 

1154 ‚ ketkgekirsiktegk 

1155 ' 

1156 - 

1157 087° drıve$asg! 

1158 

1159 0847” al OA 46 65 &b er,If,’Fehler aut’,' '+29h 


1166 


"CP/M3-B10$ 2 
Kernprograma 
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1161 @eb4“ tracksasg! 

1162 

1163 AB4" 3A Zu 54 AD Ba - HT, - + 

1164 

165 Bugs“ sectarsnsa! 

1166 

1167 GaBS" 2C 20 53 AD & 1, 

1163 

1169 h 

1179 ; Kkhgrkkkhrtkhehr 

1171 ; Lautwerks-Varıanle 

1172 ‚ tkkttktikkkrrgkr 

1173 i 

1174 

1175 cseg 

1176 [@) 
1177 @iFF’ nl ddrv:  dets |] ; Angewaehltes Lautwerk 
1178 0200 0062 Ark! mefs 2 ; queltıge Track Nummer 
1179 0202 a2 &sect! dets 2 ; queltıge Sektor Mmmer 
1199 0294’ mom2 dnmaı defs 2 ; weltige DM Adresse 

1181 A2on’ on scnt! detp A ; record-Zaehler bei rultısector Transf 
1132 

1183 cs2g 

1134 

1185 0287’ 0 @obnk: deto 4 ; Eank fuer ÖMA Operationen 
1186 0209 00 &conk: mer 4 ; Bank fuer Programmabıauf ( in TPA ) 
1187 

1188 | 

1189 ; ENDE des invarianıen Terlas mes EI0S 

11% i 

119 

1192 end 


9 Error(s) Detected. 521 Program Bytes. I$$ Data Bytes 


254 Symtols Detected. 


"CP/M3-B108 : 
Cross Reference! 

alas’ PDECL 778 
BIaF’ PRSGSLOOP 742 
6979“ REAU 118 
0937” RWSCOMMON 1653 
8" SECTORSMSE 825 
MORE" SECTRN 122 
934° SELDSK 113 
6073’ SETSJUMPFS 259 
On6A" SETENK 1% 
0063” SETDMA 117 
SE” SETSEC 116 
0959” SETTRK 115 
AlAD’ STOPLOOP 773 
@1BC’ TABLEIA 767 
OB" TRACKSMSE 821 
DOC’ WEOOT 104 
981” WRITE 119 
O1F3’ XOFFLIST 546 
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776 
752 
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Zu Dec 35 09:15 ZiiASm 1.24 Fage 24 


"cP/ra-BIOS . za Dec 85 09:15 ZWASM 1.24 Page 22 
Cross Reference: 


mis" 2AUKl a 
MR’ MAIS 3 124 
@m12' ?AUXO 118 
39" ?ANOS 125 
Birik DEAN Ale"! 
SI" TENKSL 5 15 
Bra“ 2BOOT sI 10 
H1S04 CI 2 Ta 
BRRE 2CINIT wg 12 Al 
MAR ?CIST 2 573 
BALTE ?CO [TR v.) 
1903" ?CONIN FT.) 
BRC" ?CON) 2 107 567 
33" COS a 13 
Ans" TCONST 1 105 
HIASE ?COST 2 53 5% 
Bat" YDEVIN a 12 
Mma2" YORTEL 4 189 
Rt" PNTEL M 127 
ag? ?FLUSH 8 13 
MIg" HOME 2 112 
made TINIT 51 
STE ILDCCP 5 2% 
BROR" ALIST a 109 
MU’ ALISTS a 1a 
MAAS’ MLTIO 1 
Ban" MON 18 
AAACH MOVE “13 
AISC' ?FDEC 72T he 
AICE' 2POERR 189 
Dir" PPMS6 RT 07 Ei 
ZT" AREAD ”2 13 
39738 PRLÜCP Ss m 
#39" PSCTRN 3 12 
Bl" ?SLDSK 22 113 
AASA" ?STENK 5 1% 
mm24' ?STOMA 2 17 
AAZI" TSTSEL 2 16 
Alk" ?STIRK 2 18 
ARE" FTIM ss 1 
Art ?TIRE 57 13 
ma" AWBOOT Fa T ee 
M2R' PWRITE 2 119 
BAST' ?XNOV 137 
ARSCH TXRUVE a 137 
SS" HOME 12 34 
a1758 AAIVEC 7 6% 
PRESR AAOVEC 2 m # 
Amen: BENKEF Re) 

#203’ @CENK 59 93 92 11% 
A170 RCIVEC 7 
B206' ACHT 53 1132 1181 
ARE BCOVEL 28 
A1aBE ACTEL “u 31 58 
M207" @UENK 53 1007 1185 
Azan SO 5391 1190 
RIFF" @URV 52 218 #6 165 1177 
MAIS AOTEL SI 27 3 IR 108 
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"CP/R3-EIUS 
Cross Reference! 


ortlrk SLUVEC 
GRSCH AMKTPA 
az" ASECT 
BR" STRK 

8174" AUKin 
657° AUKIST 
Wr?" AUXOST 
BE" AukGuT 
FFFF EANKED 
GiED’ ENKSEL 
u“ BOT 

a3" BCOTS] 
ankz' BOOTSSTACK 
ER” CHinTTsL Cop 
aaa CP 

617A’ CISNEXT 
188’ CISKEADY 
9149’ CH 

Wl4E' CI2 

wi5C' CISSNEXT 
lab‘ CISTI 
9" CUSNEXT 
ala" Col 

ic’ CONIN 
RZ" CGNOST 
GhBA' CUNDUT 
a2" CONST 
OF’ COSSNEXT 
g1a2’ Cost 
#163° CUSTER 
U CR 

“ol CTLA 

1% ILS 
walb" DrINITSLOÖP 
mt“ DSINITSMEIT 
382" LEVEL 
A7“ ERIVESMSE 
wong" FLUSH 
9“ GETAUR 
5" GETDPH 
th" GeTuRV 
@177' INSSCAN 
EA“ IPCHL 
H15A’ ISTSSCAN 
A LF 

ach" LIST 
ec" LISTST 
MIR MESKÖNSKÜFF 
Wlebt MOTÖFF 
aA” MWILTIO 
iA2' NEXT 
9160’ NEXTSDIGIT 


MUB’ NOTSOUTSLEVICE 
ORCE' NOTSOUTSREADY 


9126’ NOT$SQ 
6128’ NOTSS 
REF" OSTESCAN 
CT’ OUTSSCAN 
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482 


973 
93 


651 


759 


SIb 


Viak, 


Is 


713 
324 


323 


SE 
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1173 
1173 


1078 


Kapitel 7 Das BlOS-Segment CHARIO 


Dieses Programm-Segment des BIOS ist für die reine Hardware- 
Anpassung der Zeichen- (Character) Ein- und Ausgaben verant- 
wortlich. Es sind hierunter die Treiber zu verstehen, die Zeichen 
bearbeiten, die nicht auf Diskette gespeichert sind oder werden, 


also alles was mit der Konsole, dem Drucker oder dem AUX-Kanal zu 
tun hat. 


Das Segment CHARIO besteht prinzipiell aus 7 Teilen: 

1. Die DEVICE (phys. Einheit)-Tabelle. In dieser Tabelle 
sind alle vorgesehenen physikalischen Einheiten eingetragen. 
Ihre Reihenfolge untereinander ist das Kriterium wie die 
einzelnen Treiber angesprochen werden. 
Im Beispiel wird mit DEVICE ® immer die physikalische 
Einheit 'KEY' (Tastatur) angesprochen und mit DEVICE 2 die 
physikalische Einheit 'TERM’ (wie Terminal). 


2. Abhängig von der DEVICE-Tabelle: die Initialisierungsunter- 
programme aller Einheiten. 


3. Abhängig von der DEVICE-Tabelle: alle Ausgabe-Status-Unter- 
programme. 


4. Abhängig von der DEVICE-Tabelle: alle Eingabe-Status-Unter- 
programne. 


8: Abhängig von der DEVICE-Tabelle: alle Ausgabetreiber. 
6. Abhängig von der DEVICE-Tabelle: alle Eingabetreiber. 


7% Entsprechende Verteiler-Unterprogramme auf die einzelnen 
Treiberprcgramnme, 


Die Zuweisung der entsprechenden physikalischen Einheit(en) an 
die fünf möglichen logischen Einheiten erfolgt im Programnmsesment 
BOOT oder mit dem TPA-Befehl DEVICE.COM. 


Die 5 möglichen logischen Einheiten sind: 


CONIN, CONOUT für die Konsole 
AUXIN, AUXOUT für die Zusatzschnittstelle 
LST für den Drucker 


Jede beliebige physikalische Eingabe-Einheit kann jeder beliebi- 


gen logischen Eingabe-Einheit zugewiesen werden, das gleiche gilt 
auch für die Ausgabe-Einheiten. 


Es können einer logischen Einheit mehrere (theoretisch bis zu 16) 
physikalische Einheiten zugeordnet werden. 


Die Zuweisung erfolgt durch setzen der entsprechenden Zuweis- 
ungsbits (gesetzt=1, nicht gesetzt=® ) in den entsprechenden 16 


Bit-Vektoren CIVEC..LOVEC im SCB. (Näheres dazu siehe auch Kapi- 
tel 18 - BOOT). 
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Sind mehrere Ausgabeeinheiten vorgesehen, so wird auf jede Ein- 
heit ausgegeben, das Tempo bestimmt dann natürlich die langsanste 
Einheit. Im Falle der Eingabe wird immer nur die Eingabe be- 
rücksichtigt, die zuerst erfolgt. 


Das nachfolgende Listing zeigt das Programmsegment in allen De- 
tails. 


Dieses Listing wird im allgemeinen das 'Hauptarbeitsfeld' des 
CP/M Benutzers sein, der in 'seinem' System neue und neuartige 
Ein- Ausgabe-Schnittstellen implementieren will. 


In dieses Programmsegment hinein gehören auch die speziellen 
Treiber für spezielle Video-Karten wie z.B. der Treiber für die 
VIDEO-80 Karte von ELZET-8® Mikrocomputer. 


Derartige Treiber sind meist recht komplex, da sie die Verwaltung 
eines Zeichenausgabepuffers in alien Details übernehmen müssen. 


Um 'Platz’ in der TPA zu schaffen, können die Treiber, nach 
entsprechender Bank- und Stackumschaltung natürlich auch in den 
Bankbereich eines CP/M 3 Systens verlegt werden. Bei 'Banküber- 
greifenden’ Softwaretreiber muß u.U. ein 'eigener' Stack im 
gemeinsamen (Common) Speicherbereich vorgesehen werden, da der 
(evtl. ursprünglich in der TPA liegende) Stackpointer zwar immer 
noch auf die richtige Adresse, aber in der falschen Bank zeigt. 
Dies kann zu "ominösen' Systemabstürzen führen, die recht 
schlecht zu finden sind ..... 
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"CP/n3-BI0S fuer NOR-Computer’ 2 Dec 35 A9:16 ZEOASM 1.24 Paoe 1 


Zeichen EIN/AUSGABE 


00 Ss nen au 


45 000" 79 

46 0901’ FE 6 
47 0003" DR 

43 0004’ 69 

43 0005 26 
5a 07’ 29 

Sı aag' 11 alla‘ 
52 and‘ 19 

53 oc’ TE 

54 00" 23 

55 Ok’ 66 

56 MOOF' 6F 

57 0919° 11 @12C’ 
53 013’ E9 


MACLIB DEFAULT. Inc ; Vereinbarungen 
MACLIB MIDEBAUD. INC 
RRKERKHRKRRHKKRKhE HERE RR RR KR RRIKRKRRRIKRRR KALK HRRRKÄ FR KR KF 
‚x 
‚* rel 1.] von 31.19.85 
BR 
‚* physikalischer Treiber fuer Zeichen Eın/Ausgabe 


;* geschrieben von RAÖUL G. KÖERBER 

;* nach Unterlagen von ükI teilweise mıt grossen 
;* Abaenderungen um cas Programm flexibler an cıe 
;* Moeglichkeiten eines NÜR-Computers anzupassen 
k 


en Fi dee 


SRRREKERRRERRERSRRRORRREEKRRERKEKRRRRKKERREKKRE RER ERRRKKIKK kt 


‚ kktrakkklkıkktıa 
; Systemadressen 
ı karkarkkkkazgckk 


public ?cinıt,?cı,?co,?cist, ?cost 
public Actbl 

public toaud 

extrn inısud 


cseg ; Im gemeinsamen RAt-kereich 


‚ keasskkatrikkariekkrikkherkekkkr 
; Imtialisierung 
DE 3737377775575535975737 7975797734 


D 


?cinit! 


; Diese Routine wurge anders ais der DRI Vorschiag 

; aufgebaut um eıne groessere Flexibilitaet zu erreichen 

; erwartet beim Aufruf eıne bevice-NMumner in {C} 

; vebergibt dem angesprungenen Ihnterprogramm 

; <C> unveraendert und <GE> mıt Zeiger auf MCTBL+7 (bawirate) 


ld a,C ; Device-Munmer 

cp max$jevices ; noch im Bereich ges Moeglichen ? 
ret nc i ... wenn nıcht 

ld lc ; Device-Mmner ais 

id h,e ; Zaehler 

and hl,hl ı 2% 

ld Je,ny$oet ; Zeiger in DEVICE-Tabelle 
ayi hl,ae 

id a,(hl) ; Aaresse auslesen 

inc hl 

ld h,(hl) 

ld l,a 

ld de, Actbl+7 ; Zeiger in &CTEL 

jp (hl) ; und Routine ausfuehren 
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"CP/M3-BIUS fuer NR-Cmputer" 
Zeichen EiN/AUSSABE 


59 
69 
6] 
62 
63 
64 
55 
56 
67 
59 
78 

n 

Ta ME 1082: 
73 17’ 47 

74 mal" 21 27" 

75 ib’ 7E itaev2l! 
76 BC’ E& FR 

77 lc’ E9 

78 air’ 77 

79 0020 28 

az 2 

a1 022° 13 

2 

23 25" 02 18dönsg: 
34 a2’ FF 

85 mie’ FE Ab 

= 

37 

3 

9 

% 

aa ala ı$dev! 
92 0020’ 47 

42 War 21 035’ 

34 31’ 13 63 

45 

“rt 1$dönsg! 
97 0934’ CF € 

CE AR 

Er) 

108 

101 

102 

193 

194 Ba’ A HlAC' ı1$devd! 


109 192 isdänse: 


111 @44' EE 6B 

12 

113 

114 

115 

116 

117 e046' C9 isdevS: 


72 
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kasrkakktirsckgepkkkirshterchackkkhteegkktkeiek 
kıer folgen aie eınzeinen Inıtrautinen 
sall keine Neuinitialisierung erfoıgen 


Asksrpspäkpshitetigretttegghiistertrkihkkkrchhrk 


; ka SER als Terminaianschiuss 


id a,ttbaug) ; Baugrate einlesen 

la d,a nach <B> 

la hl,ısaimsgt2  ; Zeiger aut baugrate-Inıt 
id a,inl) ; wert eınlesen und 

and 111 Ina ; 'alte‘ Eaudrate maskıeren 
ar b : und 'naue’ Bawjrate dazufuegen 
14 (hl),a ; wieder anlegen 

get nl 

ec hi ; Zeiger aut Laenge des Inil-Strings 
Ip Inısub 

b.ı) 2 ; Laenge 

3b ucan, 1461110 ; 2stop - Spit + Baudrate 
& ucmd,&iällo ; keine Farıtaet -utr 
kt AuX mit SER 

ld a, (abaud) 

id b,a 

ld hl, i$ılänsgrZ 

jr ı$dev2! 

& 2 

b.) ucon2, 10611114 

& uond2, eiwmilib 

s ks6X SPRINT mıt SER 

ld a, (phauy) 

ld b,a 

ld hl, i$d4msgt2 

jr i$dev2l 

ab 2 

ob ucon] ‚100111 1%0 

[.) vera! lalic 

; 338 PPRINT nıt CENT 

' 

ret ; keın INIT noetig 


kann gie Routine eıntacn mıt RET angeschlossen weroen 


"(P/N3-BIOS fuer NOR-Computer' 2 Dec 85 09:16 ZSMASM 1.24 Page 3 
Zeichen EIN/AUSGABE 


118 

119 ’ 

14 De > 3943365993353939979399945655991 

121 ; Beginn der Ein/Ausgaberoutinen 

122 5 ARKRRREKKERKRERRRRLKR RER FAR K IKK 

123 B 

124 i Diese wuroen entgegen dem DrI-Vorschiag ebenfalis 
125 ; In einzelne Imterprogramme autgesplittet um auch 
1 ; hıer maximale Fiexibilitaet zu erreichen - wenn 
127 ; gıes auch mıt weniger optımalem CODE erreicht wırd 
128 i 

129 ; Einsprung in oe Interprogranme ertolgt: inner 
139 ; ueber eine entsprechende Tabelle mıt dem Device-Öffset 
131 ; ( von CP/M uebergeben ) in <B> 

132 

13 h 

134  kairaakkripkkank 

135 ; Eingabe 

136  kakkakkakipekkkr 

137 ; 

138 

139 0947° ?cı: 

144 

141 H 

142 ; Konsolen Eingabe ( alle Üevices ) 

143 ; Device-Mmmer ın <B> 

144 ; Zurueck mıt Zeichen in <A> 

145 ; Falls Device nıcht angesprochen werden kann, ıst A=lAt 
146 ’ 

147 

148 947° 78 ld a,b ; bevice-Nummer 
149 943°’ FE 96 cp raxfleyices 

159 Ada’ 3E 1A ld a,lah 

151 @04C’ 09 ret ne ; physikalisch nıcht vorhangen 
152 au’ CO 5b? ?eil: call  ?eıstl ; warte bis Device bereit 
153 4054" 28 FB jr z,?cil : 

154 

155 ; 

156 ; ?CIST brinat Device-üffset in <Üf> zurueck 

157 i 

158 

159 0052’ 21 anky ld hl,cı$stol 

160 9455’ 13 23 ir ?cost2 ; Rest von dort ... 
161 

162 H 

163 IR ++ 5335933757737 

164 ; EimStatus 

155 DB > 395596975943597 

166 ; 

167 

163 957’ ?cist: 

169 

178 R 

ın ; Konsolen Eingabe-Status 

172 ı Device-Nummer in <B> 

173 ; Zurueck mit <AD=FF wenn Device bereit 

174 ; sonst <A)=@W und Z-Flag gesetzt, 

175 ; Zurueck mıt <DE) bereits als Offset 


176 i 


"CP/M3-510 fuer Nün-Coneuter‘ 
Zeichen EIN/ÄLSGAER 


177 





$ 


773’ %coi: 


® 
& 
ESEME 
1% 


+ 
u. 


zi0 Buck" 21 alal’ 
211 Ba71’ 18.00 


213 
219 0973’ ?cost! 
224 


239 0973' 78 

231 2074’ FE 66 

232 876' E00 

233 0979° 08 

234 0079 58 ?costl: 
235 7A’ 16 00 


74 


1 2.0 
cr markgjeyicss 
ig 2.0 
rar Ile 
le 5 
12 DER, 
iz ni,cıstätgi 
Ir cast} 
ı krAkkekktEtehtee 
; Ausgane 


5 RRRRRRERRRRAGRRE 


D 


‚ konsolen Ausaane 





; sort gent's weiter 


; Device-Mummer ın <E> und auszugenenges Zeichen in cl} 


D 


ld 2, : 
cp max$meyices 

ret nc ; 
call Peosti 

ir z,’cal 


; COST brinat Öffset in <De> nıt 
L 


ld hi,costpl 


Ir ?cost2 I A 


! kktakkertettiet 
ı Aus-Status 
3335335 777379773 


; Konsolen Ausaabe-Status 

ı Device-Numner ın <B> 

; Zurueck mıt {A>=FF wenn bereit 
; sonst <A>=08 


beyıce-Nunmer 


enysikalisen nicht varnangen 


ı Status lasen 
' warten bıs bareıt, 


Rest nort 


; Zurueck mıt <DE> bereits als Offset, 
; ACHTUNG <C> darf nıcht veraengert werden I11ı 


ld a,b ; Device-Nunmer 

cp naxsdevices 

ld a,0 ı ... Fehler 

ret nc ‚ wenn physikalisch nıcht vorhanden 
ld e,d 

ld d,0 


'CP/MI-EIOS fuer NOR-Computer’ 


Zeichen EIN/AUSGABE 
26 7’ ZI lab 
237 Wr" 19 ?Tcost2: 
228 19 
229 8031" TE 
Zum 2 23 
za) 0633’ 66 
242 @nS4' EF 
243 4685" E39 
244 
2 
246 
247 
243 
249 
258 
251 Ausg’ ci2 
252 
253 
254 
255 
256 
257 ass’ CD oaan’ 
253 0089’ 28 FB 
259 wach’ DB FC 
2 ETF 
z61 aRsr' 09 dunny! 
232 
2 „cu 
264 
235 
25 
267 
233 
269 ae’ Cu mAZ' 
270 9093’ 28 FB 
271 95’ DR CC 
272 0897’ 6 7F 
273 0099" 09 
274 
275 
276 
277 
278 
273 
259 
21 _cıst2! 
22 
23 
234 
285 
26 
287 ea’ DB FÜ 
28 66%’ E60 _cist2l: 
289 ae CB 
20 HOF’ F& FF 
291 aaa’ c9 
292 
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ld hl,cost$tol 


ED} hl,de 

add hl,ce ı 2 
ld a,'hi) 

ine hl 

ld h,ihl) 

id 1,a 

jp (nl) 

; KEKKRKRRRKRERRIN 
Eingabe Imterprogranme 
; kgaatkrrkkkkrchk 

; Ternınal (SER) Eingabe 


call  _eist2 


Ir z,_ti2 
ın a,(udat) 
an] Tfn 

ret, 


; AUk (SER) Einaade 


call cıst? 


in a, (woat2} 
amd Tin 


[3797049599475 51 
Eim-Status (P 
ARRRRRISRÄRERERK 


! Eingabe Status SER (TERMINAL) 


in a,lusta) 

and ao ER 

ret z ‚ nıcht fertig = # 
or 11111116 

ret, 
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"CP/RB-EIüS fuer NOR-Conputer’ 


Zeichen EIN/AUSGABE 


314 ae CD 
215 ma re 
316 ode’ 79 

317 WaAc' 03 FC 
313 Et C9 

319 

3a Ar! 

321 

322 

323 

2324 

325 

326 RAR" CO Rt 
327 WeB2’ 28 FB 
328 deb4' 79 

329 0085’ 03 CC 
330 0067" C9 

33] 

332 oe’ 

333 

334 

335 

336 

337 

38 

339 ent" CD RUF" 
340 AueB’ 28 FB 
341 We‘ 79 

342 MoBe' 03 EC 
243 0000’ (9 


_en} 


cist?: 
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; 
‚ Eingabe Status SER (Au) 


. 
D 


ın a, (usta2) 
Ir _eist2l 


ARrttRKkRLRKREL 
Ausgabe UP 
Atkkrgkkistekht 


‘ Ausgane ueber SER (TERMINAL) 


call  _cast2 
Ir z,_0n2 

g a,C 
cat, iygat),a 
ret, 


; Ausgabe weder SER lAukı 


cali  _cast} 

Jr z,_cn3 

ld a,c 

aut (at2),a 
ret 


; Ausgabe ueber SER (SPRINT) 


; varlaeutig keın Protokoll eıngenaut 
call  _cost4 

jr z,_c04 

la a,C 

aut iudatl),a 

ret. 


Ausgabe ueber Iü ıFPRINT) 


& 


"CP/M-BIOS fuer NOR-Computer' 


Zeichen EIN/AUSGABE 


382 Cl’ CD @u&3" 
353 dd’ 23 FB 
354 Buch’ 79 

355 CT 03 43 
356 CI’ Ar 

357 WCh’ 03 49 
358 Decc' & 

359 Och’ 03 49 
364 Wr" 9 


374 0000" AR 
375 Mil’ & 
376 2’ 9 


3 

4 003" DB FO 
35 05’ E6 19 
3 OT 
397 0009’ F& FF 
3 [9 
39 

3 RR" 

E21 

392 

393 

394 

5 

3% RB" DB CD 
397 0000’ 13 F6 


445 @GUF' DB ED 
406 BREI" 18 F2 


_costl: 


_tost2! 


_cost2l: 


„cost?! 


_cost4; 
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call  _eastS ; bereit? 

jr z,_c0$ ı sonst warten 
19 a,C 

out, (1mmat).a 

xor a ; Strone down 
aut (iocmi),a 

inc a ‚ Strote up 
aut (10cm) ,a 

ret, 

De > >33 533377357555 

; Aus-Status IP 

; KRRKRKRRKRRKERGK 

; 

; Ausgabe Status Gr 

xor a ‚ ıst immer fertig wenn zurueck 
Jec a 

ret 

i 

; Ausgabe Starus SER (TERM) 

i 

ın a,(usta! 

ani Va nn 

ret zZ 

or 1111lio 

ret, 

; Ausgabe Status SER iAuX) 

i 

ın a, (usta2) 

jr _costzl 


Ausgabe Status SER (SPRINT 


in a,(ustal) 
ir _cost21 
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Zeichen EIN/AUSGABE 


447 

Aug une3' 
49 

aid 

ai 

42 

413 

ala entd DR 49 
415 iieh' dr 
Alk Bee 
47T! # 
413 &0e3' (9 
419 

428 


425 or 


431 

432 werd FCa3 
433 Bed" Mr 
424 GRED' Ash‘ 
435 SER" Mh’ 
435 rl Ans" 
437 wor 3' MOSE 
433 

439 ur 

448 

441 

442 

443 

Ada 

445 ur’ Flo 
das WRFT' MRar" 
447 mora" BRSA' 
443 berB' MA’ 
449 dur’ Bus 
458 MurF' GnsF' 
45] 

452 all’ 

453 

454 

455 

456 

457 

458 viel’ Wner' 
459 4103’ FCA6 
460 8185’ dans’ 
461 6107’ GOAF' 
462 0109' Yaka' 
463 H10B' BCl’ 
464 
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„cost: 


ci$tol: 


cıststol 


costol! 


20 Dec 55 adı]s Zeus 1.24 Fage 8 


 Ausaabe Starus FRRINT 


ın a,t1acmy) ; Status 

rrca 

cef 

she 2,3 FF wenn nareıt a talls nıcnt, 
ret, 

i 

; ArkpRgapkkErItEr 

 Sprungtabellen 

‚ kaksrekkgxskkeek 

’ 


Sprunatanelle ?CI 


m ecarın vrkY 

w umay ; G0P nat keine Erraabe 

1] _cı2 ; Terminal 

zu _cı3 ı AuX 

be] Ummy ı SSPRINT har. keine Eingane 
u ummy ; PPRINT nat keıne Einaane 


; Sprumatabeile ?CIST 


M econıst ı kEY-Status 

6) 63:77 ; G0P nat keine Eınaane 
Aw _cıst2 ; Terrınal 

D.) _eıst3 ; AuX 

aM ammv ; SPRINT hat. keine Eingane 
67 dummy ; FFRINT nat keine Eingabe 


; Sprungtabelle ?Cü 


aw dummy ; KEY nat keine Ausgabe 
7) econout, ; 60P 

du _co2 ; Terminal 

dw _c03 » AUX 

b} _cad > SPRINT 

dw _c0oS » PPRINT 


"CP/MRB-EIOS fuer NDR-Computer’ 
Zeichen EIN/AUSGABE 


29 Dec 85 09:15 ZEMASM 1.24 Fage 9 


465 Oldb‘ cost$tol: 

466 

467 H 

463 ; Sprunatanelle ?COST 

469 h 

476 

am alab’ Magf’ [.) dumay ; kEY nat keine Ausgabe 
472 Hinr' Ang du _eosti ‚ Güp 

473 aill’ Anus’ au _tast2 ; Terminal 

474 G113’ OHOB’ du _tnst3 » AuX 

475 115’ auur’ du _cost4 ; SERINT 

476 117’ OuE3’ dw „tost5 ı PPRINT 

477 

473 a119' aysdef! 

479 

480 ; 

431 ; Zuweisung ger Devices bei InIT 

422 ; Im Gegensatz zum DRI-Vorschlag wercen bei ?CIniT 
423 ; einzeine Init-Routinen aufgerufen - Jamit ist, 
484 ; wesentlich mehr Flexibılitaet verbunden 

485 ; dıe Vektorn _devX muessen zu KIEL in unveraender- 
485 ; baren Verhaeltnıs stehen um eintach daraut zu- 
437 ; greifen zu koennen 

48 h 

439 

4 A113’ BSR’ _deve: dw ummy ı kEY - kein INnil 
431 AliB’ Ousf’ _devi: dw Jumay ; GP - kein InIT 
492 alio’ ala’ _dev2: dw 1$gev2 ; Terminal via SER 
493 Oli’ Mm2A’ _dev3i dw ı$98v3  SER-AUX 

444 AlZ1' 038° _evdi dw ı$aevd SPRINT 

495 #123° Wugf' _ev5: dw Jumay ; FPRINT 

446 

497 H 

48 m ?4413333783777773 

433 ; bevice-Tanelle 

Sn ‚ takshanpptkergkk 

Sal i 

52 ; hıer folgt are Devicetäbelle aut are CP/m? zugreitt 
53 ‚ sıe Jarf daher nıcht in inrem prinzipiellen Aufbau 
Sag ; erweitert, weroen, kann jeooch bıs zu 14 Einheiten 
545 ; umfassen 

Sos i 

567 

Sag A125’ &ctol! 

563 

sie } 

5 ; Zeichen Ein/Ausgabe-Einheiten ibevices) 

512 ; Reihentolge muss mit BAUDSPÖRTS und DATASPORTS 
513 ; korrespondieren 

514 ; Textlaenge ist vorgeschrieben -Textinhalt nıcht 
515 ; das nach dem Text folgende bıt gınt Infornatıon 
516 ; welcher Art das angesprochene Device ist, danach 
517 ; folgt ein Gffset in eine Bawlrate-tabelle 

518 n 

519 

526 0125’ 4b 45 53 20 & KEr ; Device @ Tastatur 
521 #128’ 91 D.) nbyinput ; nur Eingabe 

522 a12C' 0 6) haud$none ; parallell 
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"CP/M3-BI0S fuer NOR-Computar’ 
Zeichen EIN/AUSSABE 


523 

524 Bil" 47 44 58 20 

525 0133’ 2 

S26 ala" O0 

527 

S2S 135° 54 45 52 4b 

529 

Sa" BE 
5: 


338 


tbaug! 
531 

552 A’ 
533 6143’ OF 

534 0144’ GE 

535 

Sir A145 53 59 52 49 
537 Al4B’ &E 

538 @l4c’ BE 

539 

549 MAD’ 59 59 52 44 
541 6153’ 92 

542 0154" au 

543 

544 [4403 


383 333 383 


max$devices 


546 A155’ 0 ah 

547 

548 end 

» Error(s) Detected. 342 Program Eytes 
174 Symtals Detected. 
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1:7 Zu ; GLP-Ausganetreiner 
mofautput, : nur Ausaabe 
baussnone ; paraliell (ueber Ai) 
"TERM > SER - Als Termınal-Id 


mosınsaurmasserialsacssoftinaun ; Einväus mıt umscnait. 


Days ; Baudrate 

"SER ’ ı SER - als AuX 
mosınsautrmosserialrmossaftsoaud 

bauasim 

"SPRINT’ ; SER - als Seriaidrucker 
moSoutputtmosseriaitmossoftsoaud 

haussson 

"PPRINT’ ; I0 als CENTRÖNIC Schnittstelle 
mosautput 

bauasnane 

eu ($-8ctoid/8 

a : Tatelterminator 


"CP/M-BI0S fuer NOR-Computer’ 24 Dec 85 69:16 ZE0ASM 1.24 Fage 11 
Cross Reference: 


947° ?CI 2 18 

Ha" Ci 152153 

wa" PCINIT 2% 

6957° ?CIST 2 168 

SL" ?CISTI 12 182 

0065’ CO 2 13 

sie] 23 24 

673° 3COST 22 219 

79° ?COSTI 23 234 

OA7F' ?COST2 0 185 21 237 

125° ACTBL 23057 52 54 

H144’ ABAUD 91 534 

et EAUDSSEHR Ex. Due SB 5 

Boa BAUCSNONE Ss 56 542 

RI CISTEL 159 48 

BARS’ CISTFTBL 184439 

alal‘ COsTEL 218 45 

01’ COSTSTEL 2% 465 

REF DUMMY Bl 43 A 47 An Au Am A 47 
4 45 

FCA3 ECCNIN 472 

FC@n ECONIST 445 

FLAG ECGNUT 459 

25‘ I$U2MSE 4 83 

033" TS03MS6 3% 

al’ I$UANSE las 109 

9614’ 10EV2 NR 42 

ik‘ I$UEV2] 7353 107 

2A’ TS0EV3 „1 4% 

38 TSUEV4 104 444 

@46' TSOEVS 17 

25 INISUR 3 8 

#49 IOCM) 37 39 44 

48 TODAT 35 

(ab MAKSDEVICES 6 19 19 Mi 231 544 

03 MESINSOUT Eye u 3 

oal MESINPUT 521 

2 MESOUTPUT 325 87 54 

003 MBSSERIAL 9 53 597 

ad MESSOFTSEAUD 2 58 57 

6119’ MYSDEF SI 43 

aldc' PEAM 104 538 

613’ TBAUD 4 nn 5% 

FE LCMD 85 

GREE  UCHON 1 

WXKCE LCHO2 % 

BFF LCON 3 

WER UCONI 119 

@RCF  LCON2 $) 

FC DAT 239 317 

EC UDATI 42 

CE UGAT2 21 323 

FD USTA 27 34 

ED LSTAI 485 

W0CD USTA2 29 3% 

86 _CI2 1 28 434 

0% _C13 23 270 45 

99a’ _CIST2 237 RI 47 


"CPIM3-BIOS fuer NOR-Computer' 9 üer 35 W915 ZEASM 1.24 Pae 12 
Cross Reference: . 


X _CISTZI 23 30 
en2' _CIST3 ZI 3 48 
Bois’ 002 35 Mi 
Bar 003 3m 37 Ael 
wre" LOL 32 246 462 
Cl" _C05 WM 33 463 
wo" LOST #3 472 

WR _LUST2 34 78 473 
engs' _COSTZi #5 87 4% 
BR _C0ST3 EU e > re}! 
uf" _LUSTE 39 39 4 
Wr _CUSTE 32 ee ATE 
6119’ Leim 4% 

#lik' _DEV 48] 

sind’ _DeV2 4N 

atir' _DEV3 493 

o121’ _DeV4 434 

e123° _DEVS 455 
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Kapitel 8 Das BlOS-Segment NOVB 


In diesem Programmsegment werden die Unterprogramme MOVE, KXNOVE 
und die Bankumschaltung vorgenonnen. 


Das MOVE-Unterprogramm prüft vor jedem Speichertransfer nach, ob 
dieser Transfer innerhalb einer Bank oder innerhalb verschiedener 


Banks vorgenommen werden muß. Information hierüber gibt ein vom 
Unterprogramm XMOVE gesetztes Flag. 


Der Datentransfer innerhalb verschiedener Banks kann nur über 
einen Puffer im gemeinsamen Speicherteil (Common-Area) vorgenon- 
men werden. Es stehen hierzu zwei Möglichkeiten zur Verfügung: 


U: Im SCB ist (vom BLOS vorgegeben) ein 128-Byte Puffer ange- 
geben, der zu diesem Zweck verwendet werden kann. (BNKBF 
Offset 35H) Dieser Puffer wird auch vom BLOS für so manches 
verwendet, steht jedoch bei Aufruf von MOVE zur Verfügung. 


2. Es wird ein Extra-Puffer im gemeinsamen Bereich deklariert, 
der praktisch von beliebiger Größe sein kann. Sinnvoll ist 
dieser Puffer, wenn er Datenblöcke von 256, 512 oder 1024 
Bytes verwalten kann. Zwischengrößen bringen keinen Vor- 


teil, da der Transfer meist in der Größe von ganzen Sekto- 
ren erfolgt. 


Wird ein extra Puffer verwendet, so kann der Transfervorgang bei 
entsprechender Puffergröße erheblich gesteigert werden. Die De- 
klaration des Puffers kann als Reservierung im BIOS erfolgen oder 
wie im gezeigten Beispiel als Reservierung eines festen Speicher- 


platzes, der nicht unter die von GENCPN verwaltete Speicher- 
belegung fällt. 


Die Bankumschaltung muß den gegebenen physikalischen Möglich- 
keiten entsprechen. Falls das Ausgabeport nicht rücklesbar ist, 
müssen entsprechende Vorkehrungen getroffen werden um jederzeit 
Information über die gerade gültige Bank erhalten zu können. 


Das nachfolgende Listing zeigt ein entsprechendes Treiber- 
programm: 
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Bank & Move Maul 
} MACLIB DEFAULT. INC ; Vereinbarungen 
2 sÄRBRKRRRRRKEHELÄRRSRRRRRELLRKHRRÄÄRKRHRRRRRRRRKKERTRRRRERRRRFERK 
3 ‚* a 
4 ;t rel 1.9 vom 97.41.85 f 
5 ‚* x 
5 ‚t Das MVE-Mogul ıst Tuer Bankına una an Pragrammtransfer X 
7 ıX allgesein und 'zwischen‘ sen Banks zustaenglg Li 
3 ;* Cie Bankumschaltung erfolgt ueber Port EEFÜRT ner Eank- x 
I ‚x Eootkarte k 
19 FR r 
1 ;* geschrieben yon KAuLL ü. KüchteR X 
12 ‚* nach Unteriagen von ünl x 
13 ‚ X 
i4 SRRRRRREHERRRRRRARRSHSHURHRKRFERKRHTRRRRRRRSSERFRIKTRRRR KR RE RRKH RX 
15 
IE cseg ; gemeinsamer Bereich 
17 
18 ı 
13 ı RRERRRERKRLHKAGK 
Fi ; Systemadressen 
2 ; khakkkkherkkatıE 
22 ; 
23 
24 public move, ?xmave, "bank 
r2) extrn  #chnk 
26 
2 ! 
2a ‚ ARKRRERHIRRRRLHR RR RR HA HR RR RR 
29 ı Programmstart 
3 ı ARRRRKKRIIKERRRRR RER EEE RR ch 
3 ; 
32 
3 i 
34 ‚ trkkpukkkikektik 
35 ; Interbank-MiVe 
36 ‚ hrkkkgeekksgesek 
37 ' 
33 
39 cd" Immove! 
46 
4 : 
42 ; Aufruf mıt <Bd=Zieivank und {C>=twelidank 
43 ; Banken wergen abgelegt und eın Flag gesetzt 
4 ; aanıt bei naechstem ?MOVE Interbankmove veraniasst wırd 
45 H 
46 
47 em’ ED 43 aß‘ ld (dsonk ),bc ; Banknunmern retten 
42 Wadd' 3E FF Id a,-1 ; und IMÜVE-Fiag 
49 Et 32 5 ld (mtig),a ; setzten 
5a cy ret 
S 
22 H 
53  Atepknekketehk 
54 ; hılfsprogranme 
55 ; BERKERKEKKRRKRRK 
3 ' 
57 
Se aan’ xmovel: 
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59 
69 
6] 
52 
83 
54 
65 
kb 
67 
63 
76 
71 a‘ 


72 Wo" 7 


73 Ana! 
74 Bor" 
75 011° 
76 0612’ 
77 aid 
73 17’ 
73 aA’ 
29 6610’ 
S1 anlE! 


194 0044’ | 


195 0047’ 
106 Man’ 
187 @94C’ 
103 9940’ 
199 
11a 
1 
N2 
113 
114 
115 
116 Adde' 


E5 


ch 059’ 
ED 64 
El 

3 


xmave2! 


xaove3: 
xaoved! 


'move! 


0 Dec 85 09: 1e ZEASM 1.24 Page 2 


ı Einsprung von ?mövE mıt Ziel in <DE> und Quelle in <h> 
‚ ze Laenge ges Transfers ist in <öC) 
; es Ist eın Putfer unter oem Label AschUF eingerichtet mıt 


‚ ger Laenge A$ELEN 


ı Putfer und Laenge koennen veraengert, werden ( in GEFÄLLT INC ) 


ı Coger gırekt mıt GENCPM ) das Räf-Enge (MEMTOPI ent- 
‚ sprechend angepasst wıra. 


pusn hl 

ld hl,a$oten 
or a 

sbc hi,oc 
pop nl 

Jr C,xmove2 
call xmoved 

la a, (#cbnk ) 
call ?bank 

xor a 

ld (mtlg),a 
ex 2e,hi 

ret 

id a,b 

sub nıh afoien 
1d b,a 

push be 

call  xmove} 
pop br 

ir xaovel 


14 be,a$oien 


pusn be 

push oe 

ld a, (ash ) 
call  *bank 

ld Je, asnouf 
lcır 

pop ge 

pop be 

pussn hl 

1b] hl ,a$bbuf 
ld a, (asonk+1) 
call ?bank 
laır 

pop ni 

ret 

‚ Akkarktekkkikker 
‚ Standard-MüVE 

E35 33337 757977777 


’ 

; 

’ 

' 

85 Ist gann aber unbedinat sarauf zu achten mas in SENCEM DAT 
L 

’ 

U 


Zeiger aut Quellcate retten 
passt MOVE mıt einem Transfer ? 
keın CARRY 
CARRY wenn MOVE zu gross ! 
Zeıger aut Quellcode 
mehrfacher Transfer ... 
Ausfuehrung des Transters.. 
danach wieoer queltige Bank ... 
... selektieren 
und XMOVE-Flag 

zuruecksetzen 
Zeiger ın richtiger Keihenfoige 


: Zaehler um ASELEN vermingern 


veroleipenge Laenge retten 
ung Biock transferieren 

. verbleibende Laenge 
bis fertig... 


Laenge oes Transfer 
Laenge retten 
Zieladresse retten 
(wei idank 


Zwischenziel ist ASBEUF ım CUMMN-Bereich 
Mi 1 

...Zıel 

. .Laenge 

rette Anfang Queiicode ges naechsten Blocks 
elle ist jetzt Aschif 
Zıeibank 


MOVE I 
letze Quelladresse ( aut Bank ) 
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17 

118 

119 

120 

121 

122 

123 

124 

125 

126 &4L’ ER 
127 DO4F' 3A SC 
128 6952" 87 
123 0053 20 B5 
129 0055’ ED ER 
131 #057’ EB 
132 0058’ 09 
133 

134 

135 

1% 

137 

18 

139 

140 (m59" 

iäl 

142 

143 

144 

145 

IL 

147 59° (3 FC24 
143 

149 

156 

151 

152 

153 

154 

155 au5C' 26 
156 US 
157 

158 


"bank; 


tlg: 
Jsbnk ! 


Zu Dec 85 A916 ZEASM 1.24 Page 3 


N 
i 

; Bein Einsprung ıst in (HL) dıe Zielanresse (wonın) 

; in <DE> are üuellaoresse (woher) und ın <ECh ger Zaenler 
; (wieviel). 

; <HL> und <DE> muessen bei Rusckkenr aut nie ger Üparation 
; feigenaen Speicherstelien Zeigen ( BC ) 

’ 


ax ce,nl ; fuer Zöm-Fower HL/ÜE vertauschen 
Ib] a,{xafig) ‚ Test ob XMüve 

or a 

r nz, xmavel 2... Ja, XMOVE 

laır ; sonst ungebankter MVE 

ex de,nl : Zeiger zurueck in 'aiter' üramung 
ret, 


‚ reikkkakkktkeeek 
; Bankumschaltung 
‚ Arkkatkakikerkie 


; 
; Eankselekt, ertoigt uener Fort ERFURT auf Bank-aat-rarta 
; are Banknummer wıra ın <A> ueDerganen 
; 


Ip esetonk ; Bank ın ECURENK anlegen ung schalten 
‚ Aktsikitktästtkt 

; Varıabie 

‚ Arskhargkrttgehk 

a [) ; xmove aktıv wenn Fiag = FF 

>] [) ‚ Ziel und Quelivank ( <B> - 0) ) 
end 


0 Erroris) Detected. 95 Program Byies. 


11 Symbols Detecten. 
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Cross Reference: 


59" TBANK 4 73 37 185 146 
OnAE' MOVE 24 116 

era" TAMOVE 4 8 

13 ACENK 53 23 

FA AsEBUF w 10 

W20R  ASBLEN nn 8% 3% 
HSL’ DEENK Le DE ZT? Be 12 
FC24 ESETEMK 147 

SC" XMFL& 4 8127 155 
GA" KMOVEI sa 139 
0023" XMUVEZ RB 8 

Waze' XMOVEI 9 3 


31’ XMöVEd nn % 
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Kapitel 9 Das BlOS-Segnent DISKIO 

In diesem Programm-Modul werden alle Dinge ‚die mit dem Zugriff 

auf Laufwerke und Disketten zu tun haben, bearbeitet. 

Das Modul ist vom Prinzip her dreigeteilt: 

1. Es enthält die Laufwerkstabelle DTBL. 
In dieser Tabelle sind die Adressen aller vorhandenen DPH's 
zusammengefaßt. Unbelegte Laufwerke enthalten ®000H als 
Vektor. 

2; Es enthält die XDPH's aller belegter Laufwerke 
mit Zeiger auf die zugehörigen DPB's und die SKkVW-Translate 
Tabelle. Außerdem enthält jeder XDPH (eXtendet - erweiterter 
DPH) Zeiger auf die laufwerkstypische Schreib-, Lese-, Init- 
und Loginroutine. 


3. Es enthält unter Punkt 2 genannte Unterprogramme und dazuge- 
hörende Hilfsprogramne. 


Zum besseren Verständis der in DISKIO vorhandenen Unterprogramne 
sind einige Erläuterungen unumgänglich: 


Das BDOS greift auf die Disketten mit einer Folge von Aufrufen 
unterschiedlicher BIOS-Funktionen (in die Sprungtabelle) zu. 


Diese Funktionen veranlassen der Reihe nach: 


Ansprechen des entsprechenden Laufwerkes SELDSK 
Ausgeben der logischen Sektornummern MULTIO 
Setzen der Track-Numner SETTRK 
Setzen der Sektor-Numner SETSEC 
Setzen der DMA Adresse SETDMA 
Setzen der Bank (bei gebanktem System) SETBNK 


nachdem diese Parameter festgelegt sind folgt der 


Lesezugriff READ 
oder 
Schreibzugriff WRITE 


Letzteres sind die einzigen physikalischen Zugriffe auf das Lauf- 
werk; nur beim Lese- oder Schreibzugriff wird auch das Laufwerk 
selektiert und, falls notwendig die richtige Spur (Track) 
angesprochen. 


Diese Sequenz wird bei SETTRK solange wiederholt, bis der ent- 
sprechende READ/WRITE Vorgang abgeschlossen ist. Bei Laufwerks- 
wechsel beginnt der Vorgang wieder entsprechend bei SELDSK. 


Die Details über Laufwerksdaten, Tracks, Sektoren usw holt sich 
das BDOS aus unterschiedlichen Quellen die in der nachfolgenden 
Skizze zum besseren Verständnis zusammenhängend aufgezeigt 
werden sollen: 
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ETENREERSADREER (DRVTBL) 


H Laufwerk A ! Jeder Eintrag zeigt auf eine DPH-Adresse 
t=--------- + oder ist 0000 (Laufwerk nicht vorhanden) 
! Laufwerk B !----+ 
+------------- + ! 
! Laufwerk C 1! +=----- > Disketten Parameter Kopf (DPH) 
+------------- + +---------------- + 
! USW ! i Adresse der SKkEW-Tabelle ! 
+------------- BE Su Sg ne + 
! Laufwerk P ! ! BDOS-Internes ! 
+=--=----------- + ' ! 
+---------------------- + 4722-4222 + 
! Disk Parameter Block !<--! DPB-Adresse ! 
+00 + 4722-22 + 
ni ! CSV-Adresse ! 
+------------- + 7 +22 + 
!CSV IS ns } ALV-Adresse ! 
+------------- + 1 FT + 
SS 4 H DIRBCB-Adresse ! 
t ALV I<-- / +------------------------ + 
Faser zes + / +! DTABCB-Adresse ! 
/ a ae Te u + + 
4 !  ı HASH-Adresse !'-Bank ! 
+------------- + <= I 44-2 +------- + 
! BCB-Kopf ! ! teren ee — + 
nn 5 2 00 + + ze. BCB-Kopf ! +72! HASH-Tab. ! 
De  ——————u + +=--------- + 
v ! 
+24 +------ + V 
u ! Puffer-Adr ! Link ! were essen + 
t--=--t+------------ +------ + ! ! Puffer-Adr ! Link ! 
! ! +-- 4-20 - + - + 
V ! ! ! 
+ ! V ! 
! DIR-Puffer 1 ' ! demenemesnennn + ! 
+----- u + 4 ! DATA-Puffer 1 ! ! 
+----------- ---- + tan nnnnnnen + ! 
! +---------- + 
v ! 
+=---+--------- 4 - + ! 
! ! Puffer-Adr ! Link ! ! 
+24 ----- 4 - + ! 
! ! wie Muster Links 
v ! 
+==---------- ---- + ! 
t DIR-Puffer 2 ı! ! 
+----------- + ! 
+---------------- + 
! Die Anzahl der Puffer ist ab- 
weitere BCB'’s und Puffer hängig von den Angaben, die in 
! GENCPN gemacht wurden. Jeder 
V zugewiesene Puffer entspricht 
+----+==-==------- +----- + einem physikalischen Sektor. 
! . Puffer-Adr ! 0900! 
+----+-------------- +----- + 
! 
v 
+7 + Bild 4 Zusammenhang der Zeiger 
a letzer Puffer ! und Puffer in einem 
a nn + CP/N 3 Systen 





Aus Bild 4 ist zu entnehmen, daß zuerst die Adresse des DPH's aus 
der Laufwerkstabelle entnommen wird. 


Aus diesem Datenblock werden nun die Zeiger auf die unterschied- 
lichsten weiteren Zeiger übernommen: 


1. Hier findet BIOSKRNL die Adresse der INIT, LOGIN, LESE- und 
SCHRElB- Unterprogramme zu dem angesprochenen Laufwerk. 


2. Hier findet das BbOS alle (technischen) Angaben des 
Laufwerkes im DPB. 


3. Hier sind die Adressen der BCB’s (Puffer Kontroll Block) 
für die Datenpuffer und den Puffer des Inhaltsverzeichnis- 
ses. 


Die Angelegenheit mit den BCB’s ist sicherlich etwas 
verwirrend. Hier sind gleich mehrere Puffer, jeder mit einem 
eigenen BCB eingetragen. Das BbOS findet den jeweils näch- 
sten Puffer anhand einer sog. LINK-Adresse, sie ist es, die 
auf den nächsten BCB zeigt. 


Ist die Linkadresse 0000, so bedeutet dies, daß der letzte 
Puffer gefunden wurde. 


4. Hier ist die Adresse der HASH-Tabelle zu finden. 


übrigens überträgt das BDOS bei jeder Erstanspache eines Lauf- 
werkes (loggin) alle Daten aus dem DPH und dem DPB in BVOS-eigene 
Puffer, um schneller auf diese Daten zugreifen zu können. 


Hierin ist auch der Grund zu suchen, warum es nicht erlaubt ist, 
beim Erkennen eines Diskettenwechsels (und Umschalten des For- 
mates) innerhalb der Schreib- Leseroutine, einfach den DPH ab- 
zuändern, sondern, daß in diesem Falle ein entsprechender Fehler 
gemeldet werden muß, denn nur in diesem Falle liest das BDOS neue 
XDPH und DPB -Daten ein. 


Nun das ganze noch einmal im Detail: 


Welches Laufwerk angesprochen werden soll, muß dem BVOS vom 
Benutzer (in der CCP-Befehlszeile ) bzw. vom Programm mitgeteilt 
werden. 


Mit dieser Information wird die BlOS-Funktion SELDSK aufgerufen. 
Diese Funktion entnimmt aus der Laufwerkstabelle DKVIBL die 
Adresse des zum Laufwerk gehörenden XDPH (erweiterten Disk-Para- 
meter-Header). 


Diese Adresse wird dem BIOS übergeben - und damit alle Informa- 
tion über das entsprechende Laufwerk. 


Wird das Laufwerk erstmals angesprochen, wird von SELDSK ein 
spezielles Erkennen der Diskette angefordert (loggin), wobei der 
entsprechende XDPH an das evtl. neue Diskettenformat angepaßt 
werden kann. 
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Der Aufbau eines eXtended Disk Parameter Headers sieht wie folgt 
aus: A 


Adresse LOW BYTE HIGH BYTE 
® 78 15 
+---------------- +---------------- + 
XDPH-1® ! Adresse von WRITE f 
+------------------------------ - + 
XDLPH-8 ! Adresse von READ ! 
+------------------------------ + 
XDPH-6 ! Adresse von LOGIN ! 
+----------- ------------------- + 
XDLPH-4 ! Adresse von INIT ! 
+---------------- +---------------- + 
XDPH-2 ! UNIT ! TYP ! 
+---------------- +---------------- + 
XXXDLPHII ! Adresse des TRANSLATE Tabelle ! 
+---------------- +--------- ----- -- + 
XLPH+2 ! ® CP/N Scatch ® ! 
+--------------- - +---------------- + 
XDPH+4 ! ® ! ® ! 
+------------- - -- +------------- - -- + 
XDPH+6 ! ® ! ® ! 
+---------------- +---------------- + 
XLPH+8 ! ® ! ® ! 
+---------------- +---------------- + 
XLPH+1® ! ® ! Media-Flag ! 
+---------------- +--------- ------- + 
XDLPH+12 ! Adresse des DPB ! 
+----------- ------------------- + 
XDLPH+14 ! Adresse des CSV ! 
+----------- ------------------- + 
XDLPH+16 ! Adresse des ALV ! 
+------------------------------ + 
XDLPH+18 ! Adresse des DIRECB ! 
+------------------------------ - + 
XDLPH+20 ! Adresse des DTA,CB ! 
+---------------- ------- 22 ----- --- + 
XLPH+22 ' Adresse der HASH-Tabelle ! 
+---------------- +---------------- + 
XLPH+24 ! HASH-Bank ! 
+-------- -------- + 


Bild 8 Aufbau des XDPH's 


Die Zeiger auf WRITE, READ, LOGIN und INIT sind nur für das BlOS 
von Interesse, BDOS greift nicht darauf zu. 


Prinzipiell könnten diese Vektoren entfallen - sie machen aber 
den Zugriff auf die entsprechenden Funktionen etwas einfacher - 
da von BDOS immer die Adresse von IXXXDPHIIX des entsprechenden 
Laufwerkes übergeben wird. 


Die Zeiger UNIT und TYPE wurden im nachfolgenden Beispiel etwas 
‘missbraucht’. Unter UNIT ist die zum Laufwerk passende STEP-Rate 
€ als STEP-HOME-Vert ) abgelegt und unter TYPE ist der zum Lauf- 
werk gehörende SELECT-Code abgelegt. Dies vereinfacht die Anpas- 
sung von Laufwerken unterschiedlicher Charakteristik erheblich. 
Das BVOS selbst benötigt nur den 'Rest’ der Tabelle, beginnend 
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mit der Adresse der 


TRANSLATE oder kurz SKEVW-Tabelle. 


9 Bytes 


MEDIAFLAG 


CKS 


oO 
oo 
E13 


+ 
l 
I 
l 
l 
l 
I 


++ 


+ nun nm mn mn um num m m on nm u nn = = m un 


Um schneller auf die Disketten zugreifen zu können, 
werden die Sektoren eines Tracks meist nicht hinter- 
einander geschrieben, sondern (mit einem sogenannten 

SKEW-Faktor), versetzt z.B. nach Sektor 1 wird Sektor 
7, dann Sektor 13 usw geschrieben. Wie dieser SKEV- 
Faktor aussieht, läßt sich aus der XLT-Tabelle er- 
rechnen - den Vektor darauf findet CP/N bei XDPH+P®, 
diesen Vektor übergibt das BDOS an die BIOS-Funktion 
SECTRN die ihrerseits die Nummer des entsprechenden 
physikalischen Sektors errechnet und zurückgibt. 


werden vom BVLOS für unterschiedliche Vektoren benutzt. 


dieses Flag wird vom BVOS auf ® gesetzt, wenn ein 
Laufwerk ein'’geloggt' wurde. 


Das BIOS kann dieses Flag auf FF setzen, wenn es die 
(physikalische) Möglichkeit hat zu Erkennen ob ein 
Laufwerkschacht geöffnet wurde oder nicht. Das BbOS 
prüft vor jedem Diskettenzugriff dieses Flag, ist es 
gesetzt, wird die Prüfsumme des Inhaltsverzeichnisses 
mit dem letzten Eintrag verglichen, wird eine Differenz 
gefunden, wird SELDSK aufgerufen mit Bit ® des Re- 
gisters E auf 1 gesetzt. 


zeigt auf den sog. Disk-Parameter-Block, dessen "Inhalt 
folgende Bedeutung hat: 
-——-..:..: +... =. 222 zz zz zz cc cc cn cn nn cc nn nn nn nn un + 
Bedeutung ! 


w 
- 
- 
[67 

+-+ 


SPT gibt die Anzahl der Sektoren pro Track an ! 
und zwar in logischen 128 Byte Sektoren. ! 
BSH ist der Block-Shift-Faktor abhängig von H 
der Blockgröße 1-2-4-8-16k = 3-4-5-6- ! 
BLM ist die Blockmaske wie BSH abhängig von ' 
der Blockgröße 1-2-4-8-16k = 7-15-31-63-127 ! 
EXN =Extend Maske abhängig von DSM und der ! 
Blockgröße. Bei DSM < 256 = ®-1-3-7-15 und ! 
DSM > 255 = X-0-1-3-7. (X=nicht möglich). ! 
(Blockgrößen 1-2-4-8-16K ) ! 
16b DSN gibt die Anzahl von Blöcken auf einer Disk |! 
an (-1). Die Gesanmtkapazität errechnet sich mit ! 
Blockgröße X (DSM+1) - ohne Systemtracks ! 
' 
' 
' 
' 
’ 
' 
! 
1 
' 
’ 
1 
' 
! 


16b Anzahl der (möglichen) Einträge im Inhalts- 
Verzeichnis (-1) 

AL® Blockreservierung - jedes Bit beginnend 
mit BIT 7 von AL® und endend mit BIT ® von All 
bedeutet gesetzt, daß der entsprechende Block 
belegt ist, entsprechend falls nicht gesetzt 
(=), daß der Block ist frei (unbelegt( ist 
CKS (DRM/4+1) gibt an wieviel (log) Sektoren 
zum Berechnen der Prüfsumme des Inhaltsver- 
zeichnisses gelesen werden müssen (wichtig zum 
Erkennen eines Diskettenwechsels. Für nicht- 
wechselnde Platten (Harddisk) kann CKS=8000h 
gesetzt werden 

-=----- ---- - -- -- - 2. + 


8b 
8b 


16b 


nn 
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cSV 


ALV 


DIRBCB 


DTALCB 


HASH 


HBANK 


+ 


+-- - on... 4. 


-- 4--------------- 
BITS ! Bedeutung ! 
----- +--------------- 
16b I! Gibt an wieviel Tracks ( für CPMLDR ) reser- ! 
t viert sind. Die Directory beginnt sofort danach ! 

8 1! PSH physikalischer record shift factor ! 
8b ! PHM physikalische record maske ! 
! Dies sind Faktoren und Masken, die von der ! 

! Blockgröße wie folgt abhängen: ! 

! Block 1-2-4-8-16k = PSH ®-1-2-3-4-5 ! 

! PHM ®-1-3-7-15-31 ! 
----- +-------------- - + 


CP/M bezieht aus den Angaben des DPB's alle Informa- 
tionen die es über die jeweils angesprochene Diskette 
benötigt, wie Start des Inhaltsverzeichnis, freie 
Blöcke, Größe und Anzahl der physikalischen Sektoren 
pro Track usw. 


Mit dieser Hilfe kann es auf das Inhaltsverzeichnis 
(DIReetory) zugreifen, in welchem wiederum alle Infor- 
mationen stehen (oder von CP/NM geschrieben werden), die 
Auskunft darüber geben, auf welchem Track und in wel- 
chem Sektor ein bestimmter Programteil steht oder 
geschrieben werden kann. 


ist die Adresse eines Feldes, aus dem eine disketten- 
typische Prüfsumme errechnet werden kann. Die Größe 
des Feldes entspricht DRN/4+1 (=CKS im DPB). 


ist die Adresse eines Felde, wo BVOS die Belegung 
(Allocation) der Diskette ablegt. Die Größe des Feldes 
entspricht DSM/4+2. 


ist die Adresse eines Buffer-Controll-Blocks für das 
Inhaltsverzeichnis. In diesem BCB können mehrere Zei- 
ger auf Pufferadressen abgelegt sein, in welchen das 
Inhaltsverzeichnis zwischengespeichert wird. 


ist die Adresse eines Buffer-Controll-Blocks für ein 
Datenfeld, welches als Datenpuffer beim Schreiben 
und Lesen von Diskette dient. 


ist die Adresse eines speziellen (optionalen) Inhalts- 
verzeichnises das über einen speziellen Algorithmus 
sofort den Sektor errechnet, in welchem die gesuchte 
Datei sein kann. Da damit das langwierige Durchforsten 
des gesamten Inhaltsverzeichnisses drastisch verkürzt 
werden kann, bringt diese Option viel Gewinn beim Dis- 
kettenzugriff - benötigt andernseits aber entsprechen- 
den Speicherplatz. Offensichtlich wird der Geschwindig- 
keitsgewinn erst bei Inhaltsverzeichnissen mit mehr 
als 128 Einträgen. 


gibt an auf welcher Bank sich das HASH-Inhaltsver- 
zeichnis befindet. 


Alle Angaben zu CSV bis HASH werden, falls OFFFEH in die Tabelle 
eingetragen wird, von GENCPN.CON angepaßt. HBANK wird ebenfalls 
gesetzt. Wird HASH nicht zugelassen, ist der Vektor auf ®FFFFH zu 


setzen. 
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Die Angaben, die zum Aufbau des DPB (Disk-Parameter-Block) ge- 
macht wurden, bedürfen sicherlich noch einer ausführlicheren 
Behandlung. 


Allem voran ist ein immer wiederkehrender Begriff zu erläutern, 
die Blockgröße. 


Es handelt sich dabei um die Datenmenge die als kleinste Einheit 
einen Eintrag im Inhaltsverzeichnis belegt. Diese Blockgröße kann 
1024, 2048, 4096, 8192 oder 16384 Bytes belegen. 


Eine Blockgröße von 1024 Bytes kann nur auf Disketten mit einer 
max. Kapazität von 255K verwendet werden. Dies hängt damit zusam- 
men, daß hier nur Blocknummern von ®0...FFH (®...255) verwendet 
werden. Bei Blockgrößen über 1924 Bytes werden Blocknummern von 
0000...7FFF verwendet. Die entspricht einer maximal ansprechbaren 
Diskettenkapazität von 512MB. 


Jeder Eintrag im Inhaltsverzeichnis belegt nun im NMindestfalle 

einen Block, im Maximalfalle belegt er 16 Blöcke (Wenn eine Datei 
größer als 16K wird, werden bis zu 31 zusätzliche Einträge im 
Inhaltsverzeichnis vorgenommen, beim DIR-Befehl wird jedoch immer 
nur der Namen des ersten Eintrages ausgegeben). Dies bedeutet 
jedoch auch, daß eine Datei nicht größer als 512K werden kann - 
eine ganze Menge -. 


Aus dem oben Gesagten kann aber auch erkannt werden, daß mit 
einer Blockgröße von 2K und einer vorgegebenen Anzahl von 64 
Einträgen im Inhaltsverzeichnis minimal 6412=128K und maximal 
64116=1024K belegt werden kann. 


Geht man von einer mittleren Dateigröße von 1®K aus, so bedeutet 
dies, daß mit 64 möglichen Einträgen nur 640K pro Diskette abge- 
legt werden können - gleichgültig ob 800K oder 1200K paßen wür- 
den, und sind es ganz kleine Dateien, würde sich die Zahl auf 
128k verringern. 


Um dieses Problem zu umgehen, sind zwei Methoden möglich: 


T; Die Anzahl der möglichen Einträge im Inhaltsverzeichnis 
wird erhöht. 


Bis 1024 Einträge ist dies ein gangbarer Weg, darüber kann 
es problematisch werden für den Fall, daß "Rettungspro- 
gramme’ für versehentlich gelöschte Dateien benötigt werden. 


24 Die Blockgröße wird verdoppelt (bis 16K-Blöcke). 


Bei der Zuordnung von Blockgröße und Anzahl der Einträge in das 
Inhaltsverzeichnis sind immer mehrere Faktoren zu berücksichti- 
gen: 


werden überwiegend kleine Dateien (bis 32K) bearbeitet, ist 
eine Blockgröße von 2K sehr sinnvoll. Sind die Mehrzahl der 
Dateien über 32K groß oder die Gesamtkapazität über 16MB, 
ist eine Blockgröße von 4K zu empfehlen. 


Die Anzahl der Einträge in das Inhaltsverzeichnis hängt in 
erster Linie von der Gesamtkapazität der Diskette ab. Ein 
recht guter Richtwert ist es, die mittlere Dateigröe auf 8K 
zu schätzen, bei einer Diskettenkapazität von 800K ergäbe 
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dies ein Inhaltsverzeichnis von rd. 190 Einträgen. Da bei 
Computern am besten mit Binärwerten gerechnet wird, ergibt 
sich ein Wert von 128 (2°7) Einträgen. 


In der Praxis steht man hier vor einen ganz anderen Problem, man 
möchte u.U. kompatibel zum Format eines Anderen sein, den leider 
hat hier Digital Research keine Normung vorgegeben - so 
'wurstelt' halt jeder nach seinem Geschmack - mit teilweise recht 
'lustigen’ Kombinationen. 


Nun zu den Einträgen im DPB im Einzelnen: 


SPT Gibt die Gesamtzahl der (logischen 128-Bytes) Sektoren pro 
Track an. 


Track kann hier sehr unterschiedlich gedeutet sein, falls 
es sich um eine zweiseitige Diskette handelt. 


Zweiseitige Disketten können prinzipiell mit zwei unter- 
schiedlichen Methoden von Seite zu Seite umgeschaltet 
werden. 


Eine Methode (die im Beispiel angewandte) besteht darin,die 
Tracks auf der Vorderseite und der Rückseite getrennt 
zu zählen, eine Diskette mit 48 Track hätte demnach 40 
Tracks auf der Vorderseite und 4® Tracks auf der Rückseite, 
also (logisch) 8® Tracks. In diesem Falle ist SPT die 
Anzahl der Sektoren je Track und Seite. 


Die zweite Möglichkeit ist es, die Seitenumschaltung in 
Abhängigkeit von der Sektoranzahl pro Seite zu machen. Eine 
zweiseitige Diskette mit z.B. 5 Sektoren pro Seite und 
Track würde in diesem Falle für SPT die Angabe 18 Sektoren 
pro Track bedeuten, bei 40 Tracks gesamnt. 


BSH aus diesem Wert errechnet sich das BIOS die Blockgröße. Es 
gilt folgender Zusammenhang: 


BLS=128°BSH 


D.h. Die Blockgröße (BLS) ist die BSH'te Potenz von 128Bytes 
(der logischen Sektorgröße) 


BLN gibt die Anzahl der logischen Sektoren in einem Datenblock 
an, mit der Besonderheit, daß der Zähler mit ® beginnt. 


Entsprechend ist BLX für die Blockkgröße 1024=7 und die 
Blockgröße 2048=15. Allgemein gilt 


BLN=(BLS/128)-1 
EXN Auch dieser Wert ist direkt abhängig von der Blockgröße, 
I Peratnale auch noch von der Gesamtkapazität einer 
skette. 


Aus EXN 14ßt sich direkt die Blockgröße als ein Vielfaches 
der kleinstmöglichen Blockgröße errechnen. 


Es gilt folgender Zusammenhang: 
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DSN 


DRAN 


AL® 
Ali 


OFF 


+------- +=------ + 


! BLS ! EXM - Werte ! 
+------- +----------- ---------- + 
! DSM<256 DSM>246 ! 
! 19024 ® unerlaubt ! 
! 2048 1 ® ! 
! 4096 3 1 ! 
! 8192 7 3 ! 
116384 15 7 ! 
+-------------- - ------ + 


Dieser Wert enthält Angaben über die gesamte Speicherkapazi- 
tät einer Diskette. 


Er errechnet sich nach der Fornel: 
DSM=((SPTX128XTracks)/BLS)-1 

Bei Laufwerken mit einer Kapazität bis 256K, darf DSN 
maximal 0®FFH groß sein, bei größeren Kapazitäten max. 
7FFFH. 


Diese Angabe steht für die maximal mögliche Anzahl von 
Einträgen im Inhaltsverzeichnis (Einträge -1). 


Das Inhaltsverzeichnis benötigt für jeden Eintrag 32 Bytes. 
Der Wert von DRM muß gleich oder kleiner dem Wert von 


(BLS/32116)-1 
sein. 


Bei einer Blockgröße von 2048 Bytes sind also maximal 
1024 Einträge im Inhaltsverzeichnis zuläßig. 


Dieses 16 Bit-Wort enthält je gesetzem Bit (Bit=1) 
beginnend mit Bit 15 - AL®, Angaben über die Anzahl der vom 
Inhaltsverzeichnis belegten Blöcke. 


Sind z.B. 128 Einträge bei einer Blockgröße von 2048K 
vorgesehen, wird der Wert 


128132 (EinträgelEintragsgröße) 
2048 dividiert durch Blockgröße 

Der Belegungsvektor sähe also wie folgt aus: 
11000009000009009 = CO®®H 


gibt die Anzahl der (für den CPM-Lader) reservierten Track, 
beginnend mit Track ® an. 


OFF entspricht dem Track,in welchem das Inhaltsverzeichnis 
beginnt. 


Einen weiteren Aspekt bietet die Angabe von OFF noch: bei 
Laufwerken mit hoher Kapazität (z.B. Harddisks) kann durch 
OFF ein Laufwerk in mehrere Segmente eingeteilt werden und 
so zessar überschaubare kleinere Einheiten "geschaffen' 
werden. 
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PSH gibt Angaben zur physikalischen Sektorgröße in der Form 
Sektorgröße= 128° cPSH+) 

PHM gibt ebenfalls Angaben zur phys. Sektorgröße in der Form 
Sektorgröße=128X(PHM+1) 


Bleibt noch ein Wort zum Aufbau des BCB’s, des Puffer-Kontroll- 
Blockes, auf welchen DIRBCB und DTABCB im DPH zeigt. 


Alle BCB'’s sind gleich aufgebaut in der Form: 
ee a nn nn a an a De en + 
Bedeutung ! 

.=_.———. |. |. —_  ..... on... ......... ...—_ + 
Laufwerksnummer in HEX (FF wenn die ! 

Zuweisung nicht über GENCPM erfolgt) ! 

welchem der Block zugewiesen ist ! 

Angaben über die Position innerhalb des! 

ganzen Datenfeldes auf welche die ! 

Adresse in BUFFAD zeigt. REC# gibt ! 

Absolute Sektornummer beginnend mit ! 

000000H an. ! 

Wird vom BDOS auf FF gesetzt, wenn er |! 

Daten enthält,die noch nicht bearbeitet! 

sind. Sind die Daten auf Diskette ge- |! 

schrieben wird das Byte=®® gesetzt. ! 

Benutzt vom BDOS ! 

Tracknummer aus welchem in den Puffer ! 

gelesen (oder geschrieben) wird. ! 
’ 

! 

! 

! 

! 

! 

! 

! 

! 


WELG 


TRACK 


SECTOR 


physikalische Sektornumnmer 
BUFFAD 


Adresse des Puffers in welchem die 

Daten abgelegt sind. 

Bank in welcher sich der Puffer be- 
findet. 

Adresse des nächsten BCB's mit Angaben 
zum nächsten Puffer. Ist die LINK- 
Adresse=0000H bedeutet dies, daß keine 
weiteren Puffer zugewiesen wurden. 

=.—— 22-2 zz 22. 2-22 zz 2 zoo. zu... + 


BANK 


! 

! 

! 

! 

t 

' 

' 

! 

! 

' 

' 

! 

! 00 
' 

! 

! 

! 

! 

' 

! 

t LINK 
! 


+ . . == mo nn n m. ==... ......+-+ 
ss... 5 5 augen 


Dies alles klang nun nicht nur recht kompliziert, sicherlich ist 
es das auch. Aber alle Angaben, die hier gemacht wurden, sind 
eigentlich nur für den Spezialisten, der 'normale' Benutzer hat 
so gut wie nichts damit zu tun, bis auf wenige Ausnahmen, nämlich 
dann, wenn neue Laufwerke und/oder neue Diskettenformate in das 
vorhandene Betriebssystem eingebunden werden sollen. 


Zur Vereinfachung für den Benutzer sind alle hierzu notwendigen 
Angaben für XDPH,DPB und die SKEW-Tabellen mit MACROS aufgebaut. 
Die Macros befinden sich in der Datei CPM3.INC. (siehe hierzu 
Kapitels 10 - Zuweisungen - Vereinbarungen - Macros ). 


Die ganze 'Arbeit' besteht dann nur noch im Eintragen der pas- 
senden Daten. 
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Das nachfolgende Listing dürfte sicherlich der '"komplizierteste’ 
Teil im CP/M 3 BIOS sein. 


Hier ist ein weites Feld für den Hobby- und den Systenmpro- 
grammierer gegeben. Leider führen die vielen Möglichkeiten aber 
auch zu Irrwegen und vor allem zur Inkompatibilität der Disket- 
tenformate. Da Digital Research nur ein einziges Diskettenformat 
genormt hat, fühlte sich jeder Hersteller eines Computers nahezu 
verpflichtet ein unkompatibles Diskettenformat zu wählen, meist 
mit dem Hintergedanken des Datenschutzes und der vordergründigen 
Behauptung ein besonders effektives Format zu benutzen. 


Das nachfolgende Listing zeigt als Beispiel einen Treiber für das 
Diskettenformat auf MINI-Laufwerken 2-seitig mit doppelter Dichte 
und 8® Tracks pro Seite. Alle diesen Daten waren bei der Imple- 
mentierung vorgegeben, da die Disketten kompatibel zu vorhandenen 
CP/M 2 Systemen bleiben sollte. 


Zur Seitenumschaltung wurde das verbreitetste Verfahren verwendet 
(nicht notwendigerweise auch das Schnellste). 


Die Diskette ist (logisch) in 2180 Tracks (=160) Tracks aufge- 
teilt, wobei sich physikalisch jeder gerade Track (®,2,4,..) auf 
Seite ® der Diskette und jeder ungerade Track (1,3,5,...) auf 
Seite 1 der Diskette befindet. Von dieser Trackunmschaltung abge- 
sehen, ’sieht'’ das BIOS auf jedem Track dann 5 Sektoren zu je 
1024 Bytes. 


Der Algorithmus der Seitenumschaltung ist besonders einfach: 
Tracknummer geteilt durch 2 ist die neue (physikalische) Track- 
nummer. Verblieb bei der Division ein Rest handelt es sich an- 


schließend um Sektoren auf Seite 1, andernfalls um Sektoren auf 
Seite ®. 


Die Sektorgröße wurde mit 1024 Bytes pro Sektor vorgegeben. Diese 
'großen' Sektoren sind unter CP/M 3 günstig, da mit einem Disket- 
tenzugriff ohne besondere Vorkehrungen) ein Kilobyte Daten ge- 
lesen oder geschrieben werden kann. Entgegen der weitverbreiteten 
Annahme ist dies der schnellstmögliche Diskettenzugriff. Sicher 
werden kleinere Sektoren 'schneller' gelesen, aber der Zugriff 
auf einen Sektor, bis er berechnet und gefunden ist dauert immer 
länger als das reine Lesen oder Schreiben. 


Das Listing hat einen Treiber für den weitverbreiteten Laufwerks- 
Kontroller WD17%x. 


Er wird im Beispiel ohne Interrupt im reinen POLL-Modus betrie- 
ben. Damit ist es in einem 4-MHz-System zwar möglich MINI-Lauf- 
werke mit doppelter Dichte zu betreiben, aber 8 Zoll-Laufwerke 
nur in einfacher Dichte - ausreichend zum Lesen und Schreiben im 
Standard-CP/N-Format. 


Bei 6-MHz-Systemen (wenn auch bedingt) oder mit einer DMA kann 
selbstverständlich auch bei 8’”-Laufwerken doppelte Schreibdichte 
erreicht werden. 
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Diskettentreider mit FLÜ2 
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MACLIB DEFAULT. IMG ı Vereinbarungen 

MALLIB CPM3 INC ; Nacros 
ESTETSEHSSEREITERESPULFTERTTERLEFERFERTSLELTELENTSSZEL TEE ES EE EEE 
‚x 
‚rel 1.0 Vin? E17 
‚x 


‘x Dieser Dısketten-Treiber ıst geschrieten fuer ie 
ı$ NOR-FLOZ mıt oem kontrolierbaustein 1793 

Hi 
X geschrieben von RAQIL U. KÜERBER 
;t nach Unterlagen von CRI 

‚x 


SERHRIKRKRRRRLRRKRREREKKIHHSLKKILKKRFIRRHRSRRKHRRKRRKR STE KR IR RR 


; Varıabie Dıskettenparameter und Bankroutinen 
' 


extrn #drv,?nank 
extrn ama.dtrk.dsect 
extrn &dbnk  ®chnk 
extrn ipchi 


L 
; Fehlerausaabe - ımterarueckung 
ß 


extern  #erme 


i 

; aligemeıne BIUS-interprogranme 

i 

extrn  ?wbaoat., Tomsa, ?pzec ‚?pderr ‚?canın, ?cona 
extrn ?const 


; Laufwerks-Motorabschaltung 


D 


global metarf,®atol 


dseg ; Bank # 


saraskkakklggtstkerthtätshsghhrr 
Lautwerks-Farareter 
AKRSEKRARAKRLLLHLRLERRERERRA RAR 


karkerkkkrgııekt 
Lautwerkstabelia 
KArKRKKRKhkARREK 


foa 
fdb 
fdc 
fd 


+??? 


k 
fi 
x 
1 
+ 
t 


x 
% 
r 
x 
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59 a" a du foe 
6 u faf 
61 @Rac“ arena [e} fg 
62 BE dw fah 
63 a du fa 
Ei A aw fd) 
5 AA an a fok 
EA aw fa 
67 3" nnd P} rom 
63 DA" A >) tm 
63 Cl en ow t0 
70 WIE” Ad a top 
7 
72 i 
73 37773 77747737781 
74 ı XDPR's 
75 ‚ ktatkeinekekhetg 
76 i 
77 ; S-Zoli Lautwerke sing nur in sıngie-nensity hetreiobar 
73 ’ 
79 
2 7“ au fgswrıte 
21 9622” 4460” 6) fasreag 
2 b Mm fosiogin 
6} fasinıt 
[) NO ; Home mit ims stap 
D.) selarmınıs ı Seiekt 5" gaunie-gensity 
faa!! dm x1t5,decS0g 
A gef Kits ı Ayressa ger SreW-Tabelie (LT 
3 Ha ei ee ; EiuS Bereich 
A gern 1 ; Meara-fiag 
A etw  debäid ; Adressa ges (fh 
91 6033” FFFE A fu 2 ı CV wırd von GENLFM eingetragen 
32 Wm3A" FFFE A 2 ; ALV wird von SECFM eingetragen 
93 MIC" FFFE FFFEA deiw  -2,-2,-2 ; DIRBCB.DTABCR mASm und HASH-Ean 
a4 a” A “tn 8 ; wird von GENÜFM eınaetragen 
5 
® n 
9 ‚ Laufwerk 'B’ 
Ei i 
1a ad." 2075" Mm tosyrıte 
ie] A456" au fasread 
1a2 047° OUEC" 6] taslogın 
103 0049" OO6B" 6, forinıt 
194 du" ou & dub ; hama mıt Ims stop 
105 6440” 22 b.) seibtaınıs ; Seiekt 5° gouble-gensity 
106 ddl” fdb:  deh x1t5,deh&ag 
197 GM40" Oa66” A aeiv  xit5 ; Aaresse ger SKEW-Tabelle OLT) 
19 OR4F” a0 on oa Ca tb  4,8,4,0,0,0,0,0,4 ; EiXS Bereich 
199 4053” FF A defb -1 ; Neaua-flag 
110 GaS3® onen’ A ce dpnääd ; Agresse des DPR 
111 3458” FFFE A af -2 » (SV wırd von GENCPM eingetragen 
112 aus" FFFE A diw -2 ; ALV wıra von GENCFM eingetragen 
113 @uSF" FFFE FFFE A etw  -2,-2,-2 ı VIRECB.DTABCB,HASA und MASr-Bank 
114 065’ A at ‚ wırd von GENCFM eingetragen 
115 


101 


"CP/M-BIiS fuer Kör-Conputer’ 20 Dec 55 data Zune 1.24 Fage 3 
Diskettentreiber ait FLÜ2 








tis H . 
117 ‚ vorlaeufig keine weiteren Laufwerke ... 
118 N 
119 
128 [a] fac gel nen 
12) DD] td gefi nein 
122 a] fe atl nen 
123 0) taf aefl nen 
124 ac] tag getl nein 
125 [u ) fa aefl nenn 
Ir3 Ba] faı tl ren 
127 [1777 f9) aefl nenn 
128 BIC) fk atl nen 
19 u] fat gefl nein 
I [au] fm @tl nen 
13] Lu] fm geil nein 
132 [u] fdo tl nen 
-1% 0] top defl nein 
134 
135 cseg ; Im gemeinsamen Bereich 
15 
137 ; 
18 ; Ahkekkakspkkigke 
139 ‚ DPE's 
iaH ‚ kkkktrakkkktigee 
141 : 
142 ; 
143 ; dpb =) [Sektor] üraesse,Anzanl, 
144 ' [Trackj anzahl. 
145 : Elockgroesse, 
146 N Gtreintrasge 
147 i und reservierte Tracks fuer Systenspur(en) 
143 ; 
143 
EU) dpb$s! pt 128,26,77,1824,64,2 8" 5559 
151 
152 au“ dpb&rd: opt 1924,5, 160, 2048,256,4  ; 5" SMTrack Zseitig 
153 an" 028 A Di ; 128 Byte (loa)-Sektoren pro Track 
164 a2" a4 dr A den Tas, 27 ; Elock-shıft und Maske 
155 and" di A mer ‚ Extent-Mmaske 
1: a5’ A185 A det rad ; Maxımale Block-Anzahl 
157 6097’ GOFF A detw Tran ; Maxınale DIR-Eintraege 
153 09’ Fa oe A detn  rinnas, Tine ; Belegungs-Vektaren 
159 OB’ 46 A a ; Pruefsumme 
169 wol’ ad A etw 4 ; Reservierte Tracks (System) 
161 Gar’ 03 97 A defb  ?ranE, ?nanr ; (pnys)-Sektor Groesse- & Shıft-Haske 
162 
183 H 
164 ; 40 Track Format 
165 r 
166 
167 scpb4hd: dpb  1124,5,54, 2048, 128, | ‚ 5” 4uTrack 2seitig 
1” ‚dpbads: ipb  1%24,5,46,1624,64,3 ; 5” abTrack Iseitig ELZET 
163 
178 dseg ; getankt 
171 
172 } 
173 ; KRISKKRRERRRERKK 
174 ; Skew Faktoren 
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181 B0s6” 6] 
182 6667° 02 
123 0063" 03 
124 0m9" 94 
185 BOGA" 05 


cu cu cu 0m 00 


24 Der 35 09:14 ZaSm 1.24 Fage 4 


‚ sttttkaskkklart 


ixltm: skew 


xlt5!  skew 
defo 
deto 
geib 
detd 
derb 


fasınıt! 


ret 


faslogın: 


i 
’ 
’ 
' 
’ 
h 
’ 
i 
’ 
’ 
’ 
0 
’ 
i 
’ 
0 
’ 
' 
’ 
ı 
’ 
' 
D 
; 
' 
’ 


2,5, 1 ; sıngie oensıty Stangart-UPm 


51,1 ; daunie-nensity 5-25il di Sektor) 
!nxtsect] 
Inxtsect] 
Inxtsect) 
Inxtsect] 
Inxtsect] 


ARRRERKKEKKERSKKKKSRRR LER KKER IKK 
vıa XDPH autgerufene Programme 
KRRIEKKKTERKRRERKHERERRRRRR RER F 


wird beim Kaltstart angesprungen um evtl narıware- 
Inıtialisıerung des Floppy-Kantrallers vornermen zu 
koennen 

bei FLÜ2 bleibt nıcnts zu tun 


aıeser Frogrammteil wırd immer dann angesprungen wenn (Fr 

eıne neue Diskette in eınem Laufwerk vermutet. 

Beim Ansprung zeigt sD&> aut den zugenoerengen XUFH 

Notwenaıg ist Sıeser Programmteıl bei moegiıchen Formatwechsel 
im gleichen Laufwerk. (Vichte-Sektargrossse-Seitenwechesl ) 


Es kann hıer eıne gewisse Art ger Formaterkennung eingebaut weroen 
Dazu stehen foigende Moeglichkeiten zur Verfuegung! 


Lesen von Seite I(2) mıt ReAlsior mit SELECT von XDFH-I 
ın iDFEUF stehen dann folgende Informationen 
Eyte IDFEUF Track# hıer unınteressant 
Byte IDFBUrf+l Seitennummer # oder 1 
Byte IDFEUF+2 Sektornummer hier unınteressant, 
Byte IDFBUF+3 Sektor Groesse 4=128 Bytes 

1=25& Bytes 

2=512 Bytes 

3=1624 Bytes 


Venn <A) aus dıeser Routine mıt NZ zurueckkomat, konnte 
gas iü-feld nıcht gelesen werden. Dıes kann 4 Gruende haben 
a) nıcht forsatierte Diskette =Fehler bleıbt konstant 


b) defekte Diskette ie A 
c) keine Seite (2) vorhanden = Diskette nur I-seitig 
d) falsche Dichte = mıt sd versuchen 
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231 I. 

232 ;2. Aus aer Sextorgrossse (jurEUF+3) koennen Rueckschiuesse 

233 ; auf nas Format geschiossen weroen. 

254 i 

255 i 

ZE6 ı Diese Art ger "Auto-Erkennung' kann natuerlich nicht alle 

237 ; Moeglichkeiten abnecken zuminaest, jedoch einige Stanyad-Fornate 

238 ; erkennen. Is eın Format erkannt, muss der ÄUfH oes entsprechengen 

239 ; Laufwerkes angepasst weroen. Eine Anpassung ıst nowwenag fuer 

248 i 

241 ; a) nıe entsprechende DFB-Airesse 

242 i b) fuer gıe entsprechenge XLT-Aarasse r ; 
28 .r4 bi 
2 ; ei 

245 ı In gıeser Kant ıguration lassen wır keine AuTü-Erkennung zu ee 
245 ; daher .... , ; 
247 © 
243 

249 ee” C9 ret e er 
259 

25] Mar" fa$reag! 

252 

254 ; lesen eines Sektors 

255 ; Autrut nıt folgengen Arqumenten bereits gesetzt! 

256 , Laufwerksnummer in ükırv)y 

267 ; Transferadresse ın (brma) 

253 , Transferbank in (tkoonk) 

259 ; Tracknummer in (dtrk) 

260 ; Sektornumer in (Asect) 

31 ; Zeiger aut WÜfH ın  <DE> 

262 i 

263 

264 a6" 21 AICF“ ld hl,readsesg ; Öperationsart 

265 0679" 01 6130” ld be ,reaissector 

266 073" 18 06 jr Twscommon 

267 

268 0075" fdswrite: 

269 

270 } 

271 ‚ schreiben eines Sektors 

272 ; Sıehe hıerzu FÜSKEAD 

273 : 

274 

275 0975" 21 AiDB“ ld hl,wrıtesasg  ; Öperationsart 

276 678° Ol A144” ld be,writessector 

277 

278 7b" rwscomaon! 

279 

2 ; 

a ; gemeinsamer Schreib/ Lese-Progranateıl 

283 

264 W07b" 22 6275” ld (opname) ‚hi ; Art oer Operation fuer Fehlermeldung 

285 0076" (5 be ; rette Funktion 

265 O7" CD AlAC" call setup ; berechne phys Track setze sso 

2 0082” EI pop hl ; Adresse des UP’s (READ-WRITE) 
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299 A083“ 

29 

291 B083" 06 OA 
22 


293 0085 

234 

295 295° (5 

2% 0636" E5 

297 087° 3A 0270" 
232 QOBA" 21 H27A" 
299 Mel” BE 

200 WOSE" 77 

| OR" 20 oh 
32 0031" ZA A 
203 094" 21 0279" 
294 0697" BE 


#9 

319 Aasb” CD anrd” 
311 DIE" HA 
sı2 @Al" CO alA6” 
313 

314 

315 add“ 

316 

317 BOAd” 3A 0272" 
313 0647” 03 C) 
319 Maag" ZA Bent 
320 B6RC” 03.02 
321 dnAc” El 

322 OUAF" E5 

323 Od“ CD Ara 
324 0083” EI 

325 a4 Cl 

326 0085” (3 

327 Wh” C5 

323 0087” E5 

329 ea" CB 67 
239 BOBA” CA AOFA“ 
331 Wr" El 

332 ße" C 
Re" 10 CA 
34 


3 
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more$retries: 

ld b,1@ 
retry$loop! 

push be 

push hl 

ld a,(cursel) 

ld hl,oidsel 

cp (hl) 

ld (hl),a 

jr nz,new$track 

id a,(Atrk) 

ld hl,olatrk 

cp ihl) 

ld (hl),a 

jr z,same$track 
newstrack! 

call _checksseek 

id br, 169 

call  oelar 
same$track: 


ld a,(curtrk) 


out (fdctrk),a 
1d a, (dsect) 
out (facser),a 
pop hl 

push hi 

call  ipchl 

pop hi 

pop be 

ret z 

push be 

push hi 

bit 4,a 

call nz,checksseak 
pop hl 

pop be 

dinz  retryslaop 


D 
‘ 
’ 
. 


hıerher wenn Fehler ... 


id a, (ermde) 
inc a 

jr z,hard$error 
} Fehlerneldung 


19 Versuche zulassen 


Schleifenzaenler 
up 
neuer select (onne sso) 

Zeiger auf 'lerzen’ select 


fuer's naechste mal ... 

oann SEEK 

alter Track (iogısen) 

Zeiger aut "letzen’ Track (logıscn) 


Track eınstelien 
Iüons 
warten 


physikalischer Track 
setzen 
physikalischen Sektor 
setzen 
up 
. retten fuer weiter Versuche 
ausfuehren 


Schleifenzaenler 
Fehlerfrei ... 


evtl RMF-Fehler 
dann nochmais SEEK 
up 
Schleifenzaehier 
. auch nach nochmalıgem SEEK 


Pruefe ob Fehlermeldungen 
FF wird 9 
. wenn JA 
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347 @8C7" ES push hl up 

343 @0C3” CD Ode call  ?pderr ; Fehlermeldung ausgeben 

343 @aCE" 2A 0275” id hi, (opname) ; lesen wer schreiben? 

359 HHCE” CD Mad call ?pasg ; ausgeben 

351 all“ 3A 0273” 14 a, (oskstat.) ; Fenlerstatus ruecklesen 
352 aaDa” 21 Hic3" Id hl,errorstable ; Feniertabelle 

353 

354 07" SE erral: 19 a,(n]) ; Fenlermeigung aus Tanelle 
355 Hana" 23 ine pi 

35 rt Ib] a,(nl) ; einlesen 

357 DA” 23 inc hi 

358 uk“ 87 ad a, ; Fenlerbits I& links schieoen 
359 90C” F5 push af ; und Zeichen + Fiag retten 
364 Wal" ER ex oe,nl ; HL zeigt auf Fehlermelaung 
361 beie" DC Aland cali  c,?rasg ;  arese Ausgaben 

3%2 @r1" EB ex @e,nl ; Zeiger zurueck 

363 O0E2" FI pop af ; und Fehierbits 

364 Me" 20 F2 jr nz,errmi i ... wenn noch weitere Fenler 
35 Ges” 21 250° 1d hi,errorgasg 5; mocnmal? 

366 Br" CD Mae call  ?pasg 

367 @OEB” CD #182” call  _conech 

368 ste” EI op hl ;Wp 

369 Wber" 28 92 jr z.more$retries ; mochmal . 

370 

371 Aarl® hara$erraor! 

372 

373 @ufl® 3E 01 ld 2,1 

374 G0F3" CI ret 

375 

376 n 

377 > ARKRRRERKRERERRR 

37 ; Hılfsprogramme 

379 ı KRERERRERRRKRKKR 

2 ; 

31 

332 ward“ check$seek 

383 

324 i 

385 ; hier wırd mıt ReÄUSIUF gepruett ob der anzusprechende Track 
Er} ; dem eingestellten Track enstpricht 

37 \ Sollte oıes nıcht der Fall sein wırd die kopfstellung 
3383 ‚ entsprechend korrigiert 

389 

399 Bora" CD Alm" call  reassıot ; versuche ID-Feld zu lesen 
391 AUF7" 28.05 jr z, id$ok } ... wenn ok 

392 00-9" CD alau“ call  restore ; sonst HÜME 

393 MARC” O6 60 id b,& 

394 ME" 78 id$ok! ld a,b 

395 AOFF" 03 C1 out (factrk),a ; Ins Trackregister 

3% ala“ 21 0272" ld hl,curtrk ; Zeiger aut physikalischen Track 
397 6194” BE cp (hl) ; beide gleich ? 

38 0105" (8 ret, zZ ; gann fertig 

339 0106” TE ld a,(hi) ı sonst SÖLL-Regıster 

400 8187° 03.03 out (focgat),a ; Ins Datenregister 

401 0199” 06 19 ld b,se=k ; + SEEK Befehl 

2 0106° 18 82 jr busy$scmd ; ausfuehren 

L! 

4a4 Aal“ restore: 
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Aus 
46 ’ 
447 : hier wıra ger kopf auf Track & eıngestelit 
43 ı 
459 
49 ala" a5 du la D, none ; Lautwerk aut TRACK 
Mil 
412 alör" busysema! 
413 
414 ; 
415 ; fuer Lautwerke are schnell genug sınd wırklicne Ans zu steppen 
4i6 ; kann hıer das NiNI-EIT zurueckgesetzt weraen - aamıt wıra mıt, 
47 ; doppelter Geschwindiakeit gesteppt, 
418 ; ACHTUNG: HÖME und SEEK muessen nazu ÜHNE VERIFT-Eit sein 
419 i 
429 
ZI a16F® 3A 0276° ld a,(fflag) 
422 6112” F5 pusn af 
423 a113° CB AF res S,a 
424 9115" 03 C4 out, (facsel),a 
45 
426 A117" 3A 8271” 1d a, (curstep) ; steppıng-rate 
427 Alla” 69 or b ı eınfuegen 
28 al1E" 03 Ca cut (facend),a ; Betehl ausgeben 
429 110" 08 Ca busy! in a,(facemd) 
aa ar" ar rrca 
431 6129" 30 FB jr nc,busy 
432 0122” 08 (8 busyl: in a,(foccmd) ; nun abwarten 
433 6124” CB 47 bit Aa ; bıs NICHT mehr busy 
434 126" 2 FA jr nz,busyl 
435 6128” 47 ld b,a ; rette Status 
4% 4129" Fl pop at ; Selert 
437 O12A" 03 CA aut (fgcsel),a 
433 0120” 78 ld a,D ‚ Status 
43 Ha" E6 and Tora a ; Maskıere READY 4 RNF-SEER. 
Am al2r" c9 ret. 
44] 
442 a1 m® reaasıat! 
443 
444 ; 
445 ; lesen ges iF-Feldes ın den iüF-Puffer 
44h ; 
447 
443 0139" 21 ans‘ ld hl, idtouf ; Braucht eigenen Putfer 
449 4133" 96 CA ld b,readıd 
459 0135” E5 push hi 
451 9136" CO Mall’ call  getaata 
452 0139° EI pop nl 
453 0134” 46 ld b,(hl) ; Tracknummer 
454 0138" (9 ret 
455 
456 AlSC" read$sector! 
457 
458 H 
459 ; lesen eines physikalischen Sektors 
a ; Erwartet Dısk-Track-Sektor-OMA gesetzt 
j ; 
462 


107 


"CP/M3-EI0S fuer NOR-Computer’ 
Ülskettentreiber mit FLÜ2 


463 M13C" 2A ana 

Ana HE" 638 

465 141” (3 al’ 

d6h 

467 aldd* 

Lo 

469 

47% 

471 

472 

A723 M1A4" ZA wa 

474 BIAT" D6 Ad 

475 A149 (3 

476 

477 aldc" 

473 

479 

439 

481 

432 

423 

434 Al4C" E& 

435 #140” 22 Bike” 

45h 0158" 2R 

437 151” SE 

483 0152” 26 
$ 
ED 


setup: 


setup#! 


433 153° © 
ERUZUTET 
431 

492 

493 

494 

4395 

46 
47 A 
433 W158” CB 7B 
433 a5" 20 O6 

509 G15F” CB 58 

sa) als” 28 02 

562 6163” 87 

503 164° IF 

SA4 A165" 32 272° setx: 
Sas A168” 3E 69 

506 GIGA” 3 64 
587 O16C°” CB CF 
508 MIGE” CB FB 
Sa3 0170 32 Ba6C’ 
519 6173° 7B 

S11 974" 03 C4 
512 #176” 32 0278” 
513 

514 

515 

516 

517 

S18 0179* 21 Oa0 
519 H17C" 28 

520 0170" 7C 


setupl: 


setup?! 
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14 hl,(kona) 
ig b,reass 
Ip getoata 


; Oma 


write$sector: 


ı schreipen sınas pnvsikalischen Sektors 


la n], (dma) 

ld D.writes 

jp putcata 

‚ hole SELECT und STEPFINGRATE aus XOPH 
; LEGE Yüfn-Idresse ab 

ex ve,nl 

ld (curapn).nl ; Ablegen 

ac nl ; Select 

ld a,inl) ; iesen 

aac nl ; Steppingrate 
ld 4,(nl) 

ld (cursel),ce ; ablegen 


‚ pnysikalischen Track aus logischen Track berechen 
; und damıt sıoo-select 


id a,(#trk) ; zuvor logıschen TRACK aınlesen 


bıt T,e ‚ eınseitiges Laufwerk? 

jr nz, setx ; wenn JA 

bıt 5,e ‚ evtl 3” 54? 

jr z,setx ; wenn A 

or a ; reset CARRY 

rra 12 

ld (curtrk),a ; Ist physikalischer Track 
14 a,0 ; sso-Flag schuetzen ... 
Jr nc,setupl ; Seite O(1) 

set l,a ; sso-bit setzen 

set 7,e ; auch in SELCOO sıde-seiect einbringen 
ld (ssoflag),a ı sso-Flag ablegen 

1d a,8 ; select 

out (focsel),a ; ausgeben 

id (fflag),a ; rette wirklichen Seiekt 


! Testen ob Diskette eingelegt ist 


' 


ld hl,® ; tıne_out 
dec hi ‚ tine_aut -] 
ld a,h 
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521 H17e” 85 or 1 

522 al7F" 28 66 jr z,setup? 

523 131° 08 C9 in a,(fdcend) 

524 133" 07 rlca ; ReAuv? 

525 

5 ’ 

527 Anmerkung: bei festverdrahteten ktADY ıst aıese Rautine 
523 ; sinnlos I!!! gann evtl Index-Loch abfragen ... nach 2beas Delay 
529 i 

5 

EriB ET Be 25 jr c,setup2 

532 u136” 69 ret 

3 

534 A127" A a setupd: Id a,(dorv) ı Laufwerk 

535 ala” C6 dl ad a,’A’ v.. Im ASCH 

536 AlSC" 32 E1F4° Id (errosk),a ‚in 

537 Higf® 21 GIER“ ld hl,nodısk ; Fehlerneldung 

538 0192” CO aaa call  ?pasg 

539 #195" 21 0250“ ld hi,aerrorsmsg ; ... nornmal 

544 AIR" CO Or call ?pasg 

54) 61%” Ch H1B2” cali  conech 

542 a1" 12 Aa jp nz,® y... nein karsstart 
543 hihi” 2A HZBE" 1d hl,(curden) ; KPH zuruecklesen 
Sad ala IE M jr setupt ; und nochmal gas Ganze 
545 

S4b AlAS“ oelay! 

547 

EL 

543 Warteschleife mıt Zashier in <EC) 


PET] Je Einheit wird | ms gewartet 

551 

552 

583 BIAS" OB det br 

554 HiA7” (5 push be 

555 AlAS” 36 89 id b,185 ; ber 4 Miz 

SS; AiAA” 19 FE din $ 

557 alAac" C pop be 

553 HID" 78 ld a,b 

559 BlAE” Bl or c 

569 AIAF” 20 F5 ir nz,delar 

561 aiBı" (9 ret 

552 

563 Ai" conecho! 

564 

565 ; 

bh ; Verlangt Zeicheneingabe von Konsole 

567 ; Zeichen wırd zum Grossbuchstaben konvertiert. 
Fi ; und das 2-Flag gesetzt wenn J oder Y gefunden wurde 
570 

571 ai2" CD Anaek call  ?conın ; Zeichen abtragen 
572 AiB5” F5 push af ; retten 

573 Alb" 4 1d ca 

574 #iB7" CO Mana call ?cono ‚ ECHO 

575 alBA” FI Pop at 

576 HiBB" E6 SF amd Sfh ; mache Grossbuchstaben taraus 
577 0160” FE 4A cp a" 

578 HiBF" (8 ret z 
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573 alCa” FE 59 
559 B1C2" (9 


589 1" ZA encnent 
5 ua14’ CO Oak 
591 8017’ A akt’ 
592 Mia’ 58 

EEEB IT 
594 310° 03 CO 
595 @eir' DB CA 
5% 21’ 97 

597 m022' 3 FR 
593 9924’ DB Ch 
59 26 CR AF 
Bo 23 05 
ED A2 

3 24’ 


getgata! 


getal: 


geta2! 


CB 47 
C2 @024' 
18 23 


getda! 


609 aaa" ZA aa 
699 0939’ CD Mach 
KIA aasc" 2A Wet" 
sl auar' 9 

E12 Mau’ BE C3 
613 9942’ 03 C9 
614 @944’ DB CA 
615 @046' 97 

616 A947’ 39 FB 
617 0949’ 08 CO 
618 AMdR' CB 4F 
619 A940’ 28 05 
629 @4F' ED A3 
621 9051’ C3 0449" 
622 

623 0054’ CB 47 
624 0956’ C2 0949’ 
625 

626 9059 F5 

627 Q5A’ 30 Moda 
628 AOL’ CO Bade 
629 @060' FI 

630 6’ 32 0273” 
631 M064’ Eb FC 
632 066’ 19 

63 

634 067° 

635 


putdata! 


rw$done! 


motoff: 


11® 
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cseg ’ 


in geweinsanen Eereicn 


' 
; Anmerkung: JP bemetiat weniger Zeit ais IR - 
; und onne ÜMA ist aıese Routine racht Zeitkritisch 


14 a, (ddbnk ) i 
call ?oank i 
lg a,(ssotlag) i 
ar I) ; 
la c,fdeuat i 
out (facead),a ; 
in a,(facsel) F 
rica ; 
jr nc ‚getal 

ın a, (faccmd) ; 
bit l,a 

Ir z,get43 ’ 
in } 
Ip geta2 ; 
bıt da i 
Jp nz,getd2 

jr rw$done 

ld a, (dobnk ) 

call ?bank 

id a,(ssoflag) 

or b 

ld c,fdegat 

out (fdcemd),a 

in a,(fgesel) 

rlca 

jr nc,putal 

in a,(fdeend) 

bıt l,a 

jr z,putd3 

outı 

jp put42 

bıt 9a 

jp nz,putd2 

push at ; 
ld a, (#cbnk ) 

call ?bank 

Pop af ; 
ld (dskstat),a H 
and 111111986 ; 
ret 


Zieibank 

setzen 

sso-Bit 

ın Eefehl eınfuegen 
Datenport, 

Befenl ausgeben 
abwarten bıs 

BUSY aktıv 


Status abfragen 


; DRO? 


wenn noch nıcnt ... 
sonst. Daten eınlesen 
und weiter abfragen 


nıcht menr EiSY? 


; Rette Fehlercoge 


Fehlercode 
Status ablegen 
Fehler maskieren 


"CP/M3-BI0S fuer NOR-Computer’ 
Dıskettentreiber mit FLO2 
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6 H 

637 ; Motorabschaltung 
638 B 

639 

644 067’ 3E 4a id a, dl eninnh ; Motor 
54 0" 03 CA aut, (facsel),a ; abscnaiten 
642 Buck’ C9 ret 

643 

644 aseg 

645 

Eh h 

647 5 RRRERKRRERERERRK 
hd ; Tabellen 

649 ‚ karkraghrskktike 
659 E 

651 

652 Alc3“ error$table: 

654 HiC3" AIF6“ Aw b7$asg 
655 BIC5" 9204” dw bösasg 
656 AIC7" 0213" dw bS$asg 
657 #109" 0225” 6.) b4$asg 
658 AICE" 0238” m bisasg 
659 #ICD” H24F" dw b2$asg 
658 

£6] L 

662 ‚ ktaskkakkekkkkır 
663 ; Text Bereich 
554 I 7957733737 557774 
665 N 

BER 


667 alCF” 2C 20 62 65 readsasgidb 
653 WIR" 20 20 62 65 wrıtesasgidb 


669 @itE" 4C 61 75 66 nedısk: db 'Laufwerk 

670 Gird" 41 A errdsk! db A 

671 AiF6" 20 GE 69 63 b7$asg: ob "nicht bereit’ ,’ "+0 

h72 Ama" 20 53 63 69 bsmsg: ib ’ Schreibschutz’ ,' "+0 

673 A213" 20 AB GF GE bSsasg: db ' Kontrollerfenlar',' ’+Sön 

674 0225” 20 44 61 74 b4sasg: db ’ Qateı nıcht gefunden’ ,’ '+SAH 

675 02" 2 66 61 ” bösasg: db ' falsche Pruetsumme’ ,' '+S0H 

676 B2Ar" 20 44 61 74 b2sasg: db ' Datenveriust’,’ ’+30H 

677 

678 a25u“ errorsesg! 

679 

699 0250" 20 20 GE 6F & = nochmal? (J/nd',' "Som 

681 

682 h 

633 3373599555393 077 

634 ; Variablenbereich 

635 ‚ Brkeuuktttckt 

6% 5 

637 

GEB MEET a2 curdph: ds 2 ; momentane KLFH-Adresse 
639 9270° Ham cursel: ds l ; morentaner Select 
a7” aa curstep!ds j ; monentane stepping-rate 
691 9272" 091 curtrk: ds l ; physikalischer Sektor 
692 9273” 002 dskstat!ds 2 ; Fehlercode 

693 0275” 0002 opnane: ds 2 ; Operationsart 

694 0277" 0002 lastop: ds 2 


", beim Lese’, 'n'+äim 
", beim Schreide’ ‚'n’+goM 


; LOWEDRIVE HI6H=] wenn read 2=wenn write 
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"CP/M3-BI0S fuer NOR-Computer’ M üec 35 49:15 280ASm 1.24 Faae 13 
Diskettentreiber mit FLÜ2 


635 0279 Al oidtrki as 1 

ER B2TA" FF oldsel: dh -] ; ungueltıg beim Start 
637 H27B" oe fflay » D) 

68 

639 cseg 

708 


71 wecl‘ ae) ssotlag;ds } 
702 wrbl'  B igroufi as & 


74 ei 


nd 
a Error(s) Detected. 115 Program Bytes. 65 Data Bytes. 
226 Symwals Detected. 


112 


'P/M3-BIOS fuer NÖR-Computer’ 


Cross Reference: 


WB TOONS 
a TOO 
Dr 27007 
TE 
Biss 
Br ro 
Be 
Be TO, 
ae PR 
TE 
BT TIEF 
wo TE 


Find ?ALL 


WSE# ?BANK 
H185% ?CONIN 
BIER ?CONOD 
Oak TCONST 
en PGCDM 
ei TGLON 
DR TGCOR 
a TECDK 
5 MNELTS 


5 PNELTST 
bi INKTBAS 
 NATSEE 


oa TPÜEC 
BOCH PPÜERK 
61% ?PNSG 
sd ?SIZE 
On PWRUGT 
WS ACENK, 
HAFT AÜENK 
ala5# Am 
HH AORV 
aa" RDTEL 
DOC2K BERNDE 
MARK @SECT 
61594 ATRK 
Bar” Blech 
WIR” Bsns6 
0225* Biss 
0213” BSSNMSG 
2204" ErsmS6 
HiFh" B76MSG 
eil0? BUSY 
Hinr® BUSYSCHO 
22" Busyl 
wörd" CHECK$SEEK 
wik2" CONECHO 
HkE” CHRDPH 
#270° CURSEL 





193 


153 


497 
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154 


153 


153 


155 


152 
153 


158 


12 


\5b 


182 


124 


5 


155 


153 153 15 


133 153 153 
183 183 183 


1315218 


122 151858 
I 


Sau 
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"CP/N3-BI0S fuer Nöh-Conpurer' Zu Der 55 015 Zaim ].Ze Frage 15 
Crass Reterance: 


6271" CGRSTEP AB nm. 

WITZ" CURTRK 37 238 

aiAs" DeLAY 12 55 Sa 

m DPR 152 

a LPESEO % 352 

W273? DSKSTAT ET 5) Br 

Bird” ERRUSK Sm 5a 

007" ERRMI 34 364 

0250" ERRÜRSMSG x 539 873 

6163” ERROR$TABLE 352 #32 

ck“ FOSINIT 1 

wol" FESLÜGIN 2 102 24 

sl" FÜSNEAD SI 1el 251 

9075” FESWRITE DI TB 7 

Bm2A" FDA Er 7 

Ha40" FÜR Pu} 

ein FLC 718 

ach FECCHD u a a 5 5 

wc FOCDAT um 533 812 

Hoc? FOCHE 30 

CA FOLSEL 4 ZN 

WC FOCTRK 313 5 

Bo FOOD gs id 

A FE 53 12 

On FF 123 

uam FG bl 12 

a FÜR 2 125 

ao FOI Bi 

Bad FDJ £4 12 

Ya FÜK 518 

en FÜL 1 

Oo FOM 67 1 

On FÜN 8 13 

m FO 63 132 

one FDP “13 

9278” FFLAG a 512 597 

a CD 181 

MalF' GETDI 5945 597 

@24' GETD2 Er 7 Va 72 

WWF" GETDI 7 

11" GETDATA 41 45 559 

OOF1” HARDSERFRÜR 341 37 

Oo HOME 46 

OMFE" I0$0K I 34 

MED" TOFBUF 448 702 

Bik IPCHL 2 323 

0277“ LASTOP 694 

29 MiNIS 85 195 

0083" MÖRESKETRIES 2939 

Ba67' MOTÜFF 4 634 

ac NEIN m 5 1271 
9 19 13 122 13 

03" NEWSTRACK a 308 

G1EB” NODISK 5377 569 

027A* OLDSEL 23 6% 

0279” OLDTRK #3 6595 

0275“ OPNANME 24 343 69 
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"CP/M3-BI0S fuer NOR-Computer' 24 Dec 35 63:15 ZASM 1.24 Fage 16 
Cross Reterence! 


0944’ PUTDI bla hl6 
43" PUTU2 67 621 624 
954’ PUTO3 619 623 
nz’ PUTDATA 45 668 
9139” REAUSIDF 3m 442 
AICF“ REALSMSG 24 6567 
6130” REAUSSECTOR 25 456 

@X4 READID 443 

Hal" RESTÜRE 392 404 
HABS" RETRYSLOOP 33 33 
97” RWSCOMMON 6 278 

0959’ RW$DÜNE bo 6 
AA” SAMESTRACK 315 

19 SEEK 46) 

a SELA & 

2 SELB 195 

alac“ SETUP 2% 47 
4159" SETUPO 45 544 
al7a" SETUPI Su 509 
H7C® SETUPZ SiI 53 

9187“ SETUPZ S22 534 
6165" SETX 495 5 
WR SKEW 130 

Wir" SSOFLAG 5 ie Tel 
albB“ WRITESMSG 275 663 
6144” WRITESSECTOR 276 467 

Aa URITES 474 


Bnh" ALTS 27 10719 
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Kapitel 19 Das BlOS-Begment BOOT, 


In diesem BIOS-Programm-Modul werden 5 Aufgaben erledigt: 


L; Die Zuweisung der physikalischen Schnittstellen an die 
logischen Schnittstellen, zumindest soweit dies CONIN- und 
CONOUT betrifft, üblicherweise aber auch AUXIN, AUXOUT und 
LST. 

2. Alle Kaltstart-Initialisierungen. Dazu gehören die (evtl. 
noch nicht vorgenommene) Hardware-Initialisierungen, die 
Schnittstellen-Initialisierungen in CHARIO und DISKIO; die 
Initialisierung einer evtl. vorhandene Uhr und die Ausgabe 
der Systemmeldung. 

3. In diesem Programm-Nodul befindet sich der Treiber um den 
Programmteil CCP.COM von Diskette zu lesen und in die TPA 
zu transferieren sowie in einen passenden (reservierten) 
Bankbereich. 

4. Zum Warmstart stellt das Modul ein Unterprogramm zur 
Verfügung, welches das Programm CCP.COM aus einer Bank 
(siehe Punkt 3) in die TPA transferiert. 

5. Alle notwendigen Uhrentreiber (falls vorhanden) werden zur 
Verfügung gestellt. 

Die Einzelheiten können dem nachfolgenden Listing entnommen 

werden: 
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"CP/M3-BIGS fuer NÜR-Cmputer' 20 Dec 55 09:16 ZEASM 1.24 Faso 1 
EOOT-Monul 


MACLIB DEFAULT. INC ‚Vereinbarungen 


I 

2 RRRRREKERERKRRRKRRSRKERERSRERRI SRH RRRREKRRRKRRRKRSHRARRKRKKKR HR 
3 € t 
4 X rel 1.8 vom 47.61.55 x 
5 x 4 
ß ;* Die nauptsaechliche Aufgabe des BücT-Momyiss ıst me k 
7 ‚# zusaetzliche naroeware-Inıtialisierung ung gas Laoen x 
3 ‚t ges CCP - im gebankten System mas ümianen von Bank zu Bank X 
$ ;* In dıesem Progranssegment ıst auch gie UHR ansesıeneit t 
19 x x 
‚ ‚X geschrieben von RAOUL D. KÜrRBER E 
12 ‚X nach Unterlagen von Oki x 
13 2 2 
14 SRRRRRRSRRIRRRRREKERSRRERRRRRSEHRSSHRRHRRRRSRRRAK HR RRKRR KK KK FR Fk 
15 

15 N 

17 ‚ Karekghtrgkareke 

18 ; Vereinbarungen 

19 233335533777 7773 

Fi] ; 

a 
22 eG bs  equ UnmSH 

m 

25 ‚ tkakkapktkititte 

28 ; Systemadressen 

2 ‚ ktikkangakkkkssk 

3 

m pwwlic ?ınıt, ?lacep. ?riccp, ?tıme 

31 extrn ?pmsg,?conın 

32 extrn @cıvec ‚tcavec,®aıvec,aovec ,‚@iovec 

33 extrn Achnk ,?bnksl 

34 extrn  ?xmove, ?nove ; fuer ?rlccp und ?lscep 
35 extern toaud ı Bawirate Terminal 

3 public inısub 

37 

38 dseg , BAnaı 

33 

4u ; 

4 ; ARRSKEKRRERRRRSRKRRLRRRRRRR KR REN 

42  Programstart 

43 ; RRISRRRRRERKERKRRRRSKKRRRKKKRRK 

44 1 

45 

46 ; 

47 > RRIRRIKKRRIKKKRN 

48 ; Hardwareınıt 

43 ‚ Aarekkhpsckerkek 

5 r 

5] 

52 ad Anıt; 

53 

54 s 

55 ; ?ınıt wırd beim Kaltstart (BOOT) aufgerufen jedoch nıcht 
56 ; beim Warnstart. 

57 ; Hıer koennen spezielle Initialisierungen vorgenomsen 
53 ‚ verden dıe nicht vorher vorgenommen wurden 


"CP/M3-BIOS fuer NOR-Computer’ 
l 


BOOT-Kodu 


59 

69 

6] 

62 

63 

64 

85 

67 

EZ 
63 Bat 22 A 
70 OR" 26 di 

FI "22 Mi 
72 0" 26 10 
73 0000" 22 Ad 
74 1a" 22 Orden 
75 0013” 26 94 

76 OS" 22 Once 
7 


78 
79 
Ei 
8 
32 
23 
34 
85 


6} 
37 018" 21 QnSA“ 
3 CO 


Eu 

3 

2 

93 

94 @alk” 21 am24“ 
95 021° 13 ih 
% 

7 

3” 

39 u’ 

IL.) 

10 

102 

103 

194 

105 

166 

167 

168 a0" 46 
109 9061’ 73 
110 o002' 87 
111 0683’ 08 
112 0004’ 23 
113 0095’ 4E 
114 6’ 23 
115 0697’ TE 
116 aoa8' ED 79 


Inısub: 


inisl: 
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‚ ıt5k Zuweisung der Einheiten 

; alese Zuweisung ist Benutzerabhaengıg und 

; muss evtl angepasst wersen. 

; Aenderungen koennen ÜN-LINE mıt Device vor- 
; genommen warnen .... 

ı Siehe hıerzu CHAkIO.MAC 


D 





ld hl, Im ; KEY als EINGABE 

id (Acıvec),hi ; Vektor ablegen 

ld h, al &enaoco ı LP als AuSSAbE 

ld (Acovec),nl ; Vektor abiegen 

ld N, Qua 1 Adna ; Aux aut SER-karte 
id (daivec),hi ‚ als Auf - Eingabe 
ld (@aovec),nl F und Ausgabe 
ld h, Boa] ah ; als PRINT CENTRONICS 


1d (&jovec),hl 


; 

; Zuweisung soweit erleaıgt - Erweiterung durch setzen 
; ger entsprechenden EiTs oder durch DEVICE. COM 

i 

; - 

‚ kk2 Standard inıtialisıerung 


ld hl,ınıttable 
call inısub 


i 
‚ sonst noch was ? - mann hıer eınfuegen 


ld hl,sıanansasg ; Begruessung 

Ip ?pmsg 

cseg ; gemeinsamer Bereich 
; hilfsprograma zur inıtıalisıerung 

; Bei Autrut zeigt <HL> aut eıne Zeichenkette 

; 1. Zeichen = Anzahl ser Kombinationen PÜRT/Zeichen 
ı danach FÜRT-Adresse getülgt von IKIT-Zeichen 

1d b,(hl) ; Laenge ges IhlTstrings(/2) 
ld a,b ; Test ob NULL-String 
or a ; wenn MIALL ... 

ret z ; dann fertig 

inc hl ; naechster kert 

ld c,(hl) ; Initport 

inc hl ; naechster Wert 

ld a,(hl) ; Inıtwert 

out (d),a ; Wert sengen 
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"CP/N3-BI0S fuer NOR-Computer’ 


BOOT-Aodul 


117 aaa" 18 FB 
119 Gnacı (9 

119 

Fr) 

12 

122 

123 

124 

15 

126 

127 

1 

18 

ie) 

'E) 

132 Und" 

13 

134 

135 

138 

137 

18 

19 

144 

141 

12 ao" AR 

143 Gr" 32 a5 
144 0011 67 

145 H612° EF 

146 a1" 22 ans‘ 
147 Hein" 11 G070° 
148 9019" CD ans’ 
149 Bell X 

160 All" 29 24 
151 GeiF’ 11 Bihh 
152 022° CD Ancd" 
153 0925’ 11 0020 
184 028° CD @067" 
155 9628° 11 0470 
156 GOZE’ CO Ach’ 
157 

158 

159 

168 

16 

162 

163 0831’ Al aa] 
164 634° CD Anh 
165 6037° 21 Coma 
166 A43A’ 11 AIad 
167 0020° BT BDan 
158 M040° C3 Aha 
169 

178 

ın 

172 

173 

174 
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?ldcep! 
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ajnz  ınısl 


ret' 


ARHRRRHHSRRIKRRRERRRSRR RK LH RR ER 
CCP kalt- und karmstartlaoer 
ARSRLÄSHRRHRRÄRRERRRERRR REF FRRR 


ı Rarskaktsttetgee 
kaltstart 
LESFSFSTT EFF TER 


iade (CP (erstmais von Diskette) in IPA 

Prinzipell kann CCP CM auen hinter CFMLOR 

gehaengt verzen und beim booten mıt auf Bank # gelanen 

‚ wergen ... von dort dann aırekt ın gen Bereich [im DFFF 
; ( also dırekt unter gem gemeinsamen RAM-Eersıch gebankt 


xor a 
id (cepsicorl5),a ; Extent in F(d = & 

1b] ha 

ig la ım=# 

14 (febsnr),nl ; Start bei FiLE-Eagınn 

id 2e,ceprfch ; FCB 

call  _open ; GPEN FILE vıa Bios ın CFALDR 
inc a : Fenter ? 

jr Z,msccp ı ... kein File CCR.CoM | 

ld ge, een ; CCP-Start 

call  _setoma 

ld de,123 ; max Ibk bytes 

call _setmltı 

la de,ccepsfchb 

call  _read ; num einlesen 


‚ wenn gebankt wird CCP gieichzeitig nach Bank @ geladen 
; ganit Warmstart ohne Diskettenzugriff moeglich ist .. 


14 be,ccpbnk shl 8 + 1 ; Brliel - (iwelle 


call  ?xmove ; ... transfer mıt xmove-Power 
ld hl,ccpıs ; Ziel in cepbnk 

ld de,tpa ; Quelle 

ld be,ccplen ; muesste Jetzt reichen ... 

jp move 


i 
‚ Arakkkrkgkkrgegk 
; Fehler - Kein (CP 
3393376553793 9 54 


"CP/N3-EI0S fuer NOR-Conputer’ 


BOOT-Modul 


175 
176 Ws" 
177 
178 
179 
156 
18] 
182 
183 
184 9943 


ZI auer 


135 0046’ CD Oo 
126 @43’ CD ordnen 


197 
188 
139 
1 
191 
192 @94C' 
193 
194 
195 
ES 
197 
133 
199 
Zug ide’ 
2 
202 
243 
zu4 
295 
Zus One" 
207 51’ 
208 054" 
29 0057 
Z18 96a’ 
zu asp?’ 
a2 
213 
214 
215 
216 
217 
218 
219 uni’ 
226 


18 BF 


91 ale 


(3 


msccp! 


?riccp: 


time: 
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ser Fıle CCP.COM ist nıcht aut ger Giskette € zu fingen ı 


' 
ı 
‚ das kann zwei Ursachen naben - er ıst wirklien nicht na 
; oder mıt den CP/M-Treibern passt was nicht ... 


ld hl, ccpsasg 
call ?pnsg ; Fehlermeldung an Konsaie 
call  ?canın ; als Warteschleife 


was nmuetzt eine endiose Schieife ... 


jr ?laccp ; en ewigen Sprung 

ı KiprkükkkktRcK 

; Warmstart (Relaag) 

; ARREKRSKKRAKhreE 

‚ nachıagen zes (CP aus Bank oner von Diskette 

ld ec,I shl 8 + ceponk ; Beiltl - (aWwelle 
call move : aut IMÖVE-Power 

id hl,tpa ; Zieladresse ın Bank | 
ld ge,ccpis ; Quallagresse in ccponk 
ld be,ccplen ; Laenge 

jp 'move 


3 337353777777773779549777 7777793 


RRERKERRERKERRERRRRRKRR EIER RER 


; Hard- oger Softwareunr - z.2. nicht implementiert 
; Wenn Implementiert entsprechenae LAtLS ın SCh.ASM 
‚ zur Zeitablege ansprechen ... Anpassung uebernimnt 
ı 6ENCFM ... 


D 
. 
’ 


ret 


RRRRRRRRRKKRRRRKRREKRRRRRRRRcK RI 
EiXS-Interface 
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"CP/M3-BI0S fuer NOR-Conputer' 


EXKT-Mogul 


PRINT 

SS 
=. 
En 


251 067° 
252 6069" 21 
253 

254 (nrA’ 


Ze3 en24* 1A dA 

270 26" ZA 2A 2A 20 
za ze za 2a 
272 

273 

274 

275 

276 

277 0957" a0 aA aA 
273 

279 


293 Och" AU OA E65 
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‚ ttkapfptpprhsstkhrrnigrrptgggeee 


_pen! 


ig 
D] 


_setmultı: 


la 
2b 


„read: 


la 
IP 


CP/M EIS Interface-Funktionen 


c,15 
2in 


[ep 


2in 


c,4 
2in 


ci 
bans 


; RRRSKRERKRREKKLIKKER RR K RA RE IRA RR 
; Textbereich - MALLO .... 
TS TTEREFTTTTT EIER ET TER FF FETT TFT 


cseI 
sıgnonsasg! 
ab 


ob 
& 


; Bank # 


els, If 
"rar CP/M VERS 3.1’ cr, If 
"aut NoR-Computer-ells ',rel,'.’‚rev,usr 


U 
ı hıer kann Benutzer-Message aıngefyegt wernen 


a 

tseg 
ccp$asg! 

[. 


er, If, from 


; gemeinsamer Bereich 


er,1f,'keın CiP.Co" mE 


122 


AKRKKRERRRRR ER F 
CCP-FEC 
KRRKRKREREKKAFRK 


"(P/M3-B105 fuer NOR-Computer’ 


EIT-Moaul 
za Wu’ 


2 
3 
E21 
305 u“ 
37 
303 
319 
KR] 
312 
313 aaSA” 
314 
315 AiSe® 
315 
217 
318 
319 
3 
32 
322 
323 
324 
325 
32 


38 


01 43.43 56 
%19 


1 


Be] 


cep$fch: 


feb$nr! 
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& 1,'CCP Com‘ d,a,0,0 

os 16 

& 9,6,8 

sag ; oank # 


5 ÄRRILKRÄRRRRKKKERRKRÄSERRR ST RR RR 
; Intialisıerungstabeiie 
ı RRRSERRKERRRRKKHRIHERFRF ERIK FR 


inıttable! 


istapl:! 
itien 


| 

; Eintragung mer INIT-werte in ger Folge PürT - WERT 

; kıer kann auch aas ( oger »enrere } Faralleli-ürucker 
; Interface (nach) inıtialısıert wersen 


& islen/2 ; Laenge 
; Im Grundprogramm liegt nıchts vor _ 
Su $-1$tadi 
(seg 
| Aakkarkkhrkhteng 
ı Fenlerkorrektur 
 Artrahtikckegkte 


i GENCPM kann unter bestimmten Imstaengen eınen 

; Fenier bei ser Barechnung ger Startadrasse sachen 
; ales wird hier karrıgıert 

» BOOT MUSS JEDOCH UNBEDINGT DIE LETZTE DATEI IN DER 
; LINK-KETTE Sein II 


os Tach 


end 


9% Erroris) Detecten. Aik Program Bries. 31 Data Brtes. 
122 Symbols Detected. 
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Cross Reference: 


Da PERKSL 3 5 
MAAR TCONEN 1% 

me“ ?INIT a 
Wh" TLDCCP a 1 12 
WS MOVE 4 163 2 
waa7k IFNSG Ei ee u 17) 
ende" PRLICR Er ) 
ol" TIME #219 
SZ ?XMÜVE 34 I 247 
Woher RAIVEC 2 7 
al lk BAOVEC 3274 

ea BCENK. 3 

mar BCIVEC 2069 
WIR BCOVEC 2 N 

ich BLUVEC 2 m 

5 ES 22257 
7U' CCPsrCE 13 14070185 281 
BF" CCPSMSG 14 31 

era CCRENK 163 Zw. 
Caaa CCPIS 152309 
ea CEFLEN ie7 210 
sa CLS 263 

RD CR a 270283 
0" FCBENR id 295 

oa ISLEN 3 38 
GaSB" ISTAEI 15 3 
ed INT] 12017 
Wo INTSUR % 89 
SA“ INITTABLE 2735 

won UF 43 N ZI ZI 2383 
43° Nüsclp 1a 176 

51 REL 272 

WR REV 22 

W024" SIGNÖNSMSG “4 27 
Oak TEAUO 3 

“109 TPA ibb 203 
3 LSK 272 

eos" _ÜPEN 143259 

EA" _READ 156 254 

Bd’ _SETEMA 152 244 
0967 _SETMULTI 114 244 
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Kapitel 11 Zuweisungen - Vereinbarungen - Nacros 


In einem doch recht komplexen Programm wie dem BIOS für CP/M 3, 
ist es vorteihaft immer wiederkehrende Vereinbarungen und Label- 
Namen für Daten in einer getrennten Datei zusammenzufaßen, die 
vor dem Assemblerlauf als INClude Datei (Einfügung) aufgerufen 


werden kann. Im gegebenen Beispiel handelt es sich um zwei Da- 
teien: 


1; DEFAULT.INC sie enthält alle Systemdaten, Portadressen 
und Befehlscodes an spezielle Bausteine. 


2. MODEBAUD. INC sie enthält Daten zur Baudrate und Schnitt- 
stellentypisierung in CHARIO 


dazu kommt noch die MACRO-Datei: 


3. CPM3.INC hier sind alle Macros zusammengefaßt, die 
von DISKIO zur Generierung der Programn- 
teile DPH,DPB und SKEW benötigt werden. 


Die entsprechenden Daten könnten sicherlich 
auch per Hand eingegeben werden - Macros 
sind hierzu aber einfacher und betriebs- 
sicherer zu handhaben. 


Die nachfolgenden Listings zeigen alle entsprechenden Details: 
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jhRRRKKRRRKRR SE RRISS HER HER HLESSHTTHHSKRRKRTKARKRTTÄHRRLI LIE II 
Er £ 
;x KöR-Cmputer 250-CPm3 x 
‚x rel 1.6 vom #7.01.35 r 
‚* x 
ı* Dieses Progranasegment entnaeit alle Voraaneverte ung 4 
‚t Konstanten, cıe menrmals ın angeren Fragrammteilen aut- { 
‚X taucnen oyar er Steyarung eınas Ässambieraurcniaufas t 
;t Jıenen. im Normaltalle muss nur aleses Progranssegment, f 
‚* geaendert weroen um 'anzere’ {P/Mr Systeme zu erstellen ı 
R Mi 
;X In diesem Programmsegment werden aucn alie Aengerungen 4 
‚X nachgehalten aıe im Laute ser Zeit an den eınzeinen i 
‚X Unterprogrammen vorgengemen wurgen wır emefenlen dem t 
;# Anwender dies beizubehalten x 
R; x 
;* Dieses Programmsegnent ıst MR sınnvoll wenn neu assemoiiert & 
‚t werden soll - es aıent sonst lanıgiıch ger aligemaınen k 
;* Intorsatıon t 
ık x 
‚# geschrieben von RAUUL U. KUERERR 4 
‘x 4 
‚Aahtrtirfrrifggrihkpnttertsrıprrappherehäuktankekthakkgieshhttt 


BBEFFFFTFTTFTTTERETISTEESTETTTRTT 
; Fenier und Aengerunasrapport 
DBETSSSSTT EFT ERISETFTUSLPLTTERFTTTG 


rel BQU es | maupt'Ausgane’ 
ray eu a ı wichtige Revısıon 
usr equ Y ‚ Benutzerreyision 


ÄRKKREKEhRRLERIR RÄT SER HEIR RER KSRRIRRRIKTÄRRRRRRHR FÄHRE AR IR K 
k t 
‚Kan wo was % 


NR ————— m nn 1 
x f 
RRRRRRRERRRKKKRKRIScKR RE ER SR HIER R RI RR RK KR Rh RR ER RR EKhRRRKKhR RX 


‚ Aktankktrkekekebrgpirsgitetgieie 
; Vorgabewerte 
ı KRXKkkKmenkheghrtgteegriphettenk 


‚ kaftıkackıaaz 
; Assembler 
; ARKKRRKrEERRR IK 


ya eu -] ; Besingungst lags 
nein em mt ya 
banked equ ya 


; KRAgaghtHhhRERRE 

; ASCI 

 ketkeerienktrtt 
mil em [) 


ctig eu pl 
ctls eu u 
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59 4097 bell em #7n 

6 [au bs eu wen 

6l Lo] ht, em 2 

62 ao if egu #an 

63 Du) vt eu #oh 

64 RC ff eau ech 

65 4 er eu “dh 

56 “ale syn equ ten 

67 Hi eis eu iah 

68 wie est eu ioh 

63 lc fs equ Ich 

78 iD 95 equ Ian 

N IE crome  equ len 

72 Mar newline eau Ifn 

73 2 blank equ 24h 

74 

75 ‚ kakreckkkggrteg 
7% ; Systemadressen 
7 ; KRrgkarkgrkerung 
73 

73 elan tpa eu aniaah 
59 DIL) ccp eu pa 

8 L[.) boran au Aduah 
32 12.77] monseg eu hf aden 
83 FcoR Ioseg au arcdeh 
34 

ss h 

6.3 

97 

2} 

% ; 

El ; 

32 ; erreicht 

3 

44 Feoo econıst eu arcaah 
3 FCH3 econın eu hfcaan 
Ku FCoE ecomut equ Arcath 
37 FC24 esetbnk equ fc24h 
Bo} FC27 efloppy equ atc27h 
9 FC34 ecurbnk equ Afc34h 
19 FC3S eddonk equ arc25h 
161 FC edchrk equ Afczsn 
a2 

143 ‚ kkirprtrakiegeet 
194 > PORTS 

a5 ‚ Aıkkarıgktkteter 
196 

187 ; ıt&X Centronic 
103 

103 [227) ioec eu den 

119 DL} 1mjat equ 192c+3 
1 049 ıocnd equ icec+9 
112 

113 

114 

115 BR was eq atch 
116 FC wat eu ubas 


; Backspace 

‚ Cursor rachıs ( Mar-Tab) 
Zeilenvorschun € Jinefeeg) 
tursor "rauf ( Ver-Tan) 
Cursor rechts 

Return 

Cursor eine Zeile 'runter 
: 5 Eriaschrim igeschen 

: ESC-Zeichen 

ı CURÜFF 

3 TEREN 

; (ursor möMe 

; CL 


Start es TPA-Bereiches 

ı Einsprung ın CCP 

; Start RAM ın EinT-karte 

ı Start ges Monıtorsegmentes 
Id-Sacment. UKER-ARCA 


nachfolgenge \P’s ruten Frogrammsegsente ın Möhlo 


; (gen I0-Segment von ELIÜN } auf - weiche ınrerseits 

; auf das BÜÖT-Rüm-Segment ın FLÜMN zurueckgreifen 

‚ Drase (etwas umstaenziicne) Prozedur ist fuer CP/M} 

‚ notwengıg, ga nıer ser Id-kinsprung aus verschiedenen 


Banken erfoigen kann - FLÜMGN aues aber nıcht, unterstuetzt 
gleichzeitig wurde ger Vorteil einer 3x groesseren TPA 


kansalenstatus (EIN) aus Mün]o 
konsoleneıngabe aus NÖNIO 
Standart-Ausgabe 

Bankuschaltung (mıt Rüf-Ausschaltung) 
Floppy-Treiber 

Eankadresse igqueitige) 

> MENK in Mono 

®&ENK ın MGNIO 


Easıspart 
batenport 
Statuspart 


; Kar SER mit VART 6551 als Terminal 


; Basıspart 
; Datenport 
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17 WÜRD usta eu,  waattl 

118 FE ud em watt2 

119 Br ucon eau watt} 

1 

121 ‚ 422 SER mit WART 6551 als SeRiellar Örucker 

122 

123 [..06 was! au #ecn ; Basısport 

124 BcC wiarl em unas] 

125 ED ustal au watitl 

125 [0,13 ucaal eu waatl+2 

127 Gürr uconl equ watl+? 

128 

129 sage SER mit UAKT ESS: als Auk 

130 

131 CC ubas! Eau scch Basısport 

132 wie wat! eu ubas2 

133 SD usta} au wbaszt] 

134 WE una? eu ubas2+2 

135 CR ucon? equ wmasi+} 

13 

137 ; t22 Sarıelle Schnittstelie käs 

133 

154 CA casbas aa wcah 

ILV) BHCA cmcas au casnas 

141 [uuw aatcas eu cashast| 

142 

143 ; 44x Tastatur 

144 

145 wi keybas equ REN 

146 [0] keyrg em kevoas 

147 [442] keys eu keybast] 

143 

149 ‚ tat Eontkarte 

150 

151 ; Ausgabe schaltet aıt EIT7 gesetzt RAM/LEP IRÜM aus 
152 ; mit BIT7 = RAN/CEPIROM aus 

183 ; Eıt @..2 kann mıt Ausgabe als EAuk-Ayresse (18..19) gesetzt wergen 
154 ; Bit 4..6 sınd gerzeit unbeiegt 

155 

156 DRCH bbport equ ech 

157 

158 ‚ik FLÜ2 

159 

169 ; Belegung der Ports FLCSEL und FÜCIRG U 
161 ; 

162 bit! 7 6 5 4 3 2 I e 
163 ‚facırg drq irg hid Zsıded - - - - 
164 ‚facset sıe moton mını 00 054 053 ds2 asl 
165 

165 ch fcbas equ Achh 

167 och fdcomd eu fcbas ; Status und Befehisregister 
168 aac fdctrk egu fchast] ; Trackregıster 

169 2 fdcsec em fcbast2 ; Sektarregister 

178 CI fdcoat eu ferast3 ; batenregister 

171 Hoch facsel equ fcbas+4 ; Selektport 

172 CA fdcirg eu fchast+4 

173 

174 ; FOC - Befehle 
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175 
176 


0016 


FAad 
FCAB 
a2 


cood 


ccpbk 
cepıs 
ccplen 


equ lan) ‚ rıt HLU chne VERIFY 

eu A ; art HLD ohne VERIFY 

equ 1000] aa ı Phys Sektor lesen if Format 

EMU 161619006 ; Phys Sektor schreiten iBM FÜRMAT 
eu Tora 1 ob ; Ib-feld lesen 

eu IT 1041306 : Track ( komel ) lesen 

eu 111191006 ; Track ( kompl } schreiten 

eu 116194@0b ; Alle iaufengen Funktionen abbrechen 


; Beı Selekt sıoad-maton-aınıs-soens gazutuegen saweit moet1g 


eu le ; Lautwerk A 

eu ; Laufwerk B 

eu ln) ; Lautwerk € 

eu Ok ; Laurwerk 0 

eu ne ı Seite 2 ( Achtumg JUMPER ) 
eu DL) ‚ Bif5=t ainı-Laufwerke 

eu en) ; EIT4=) soens EIT4M asens 
‚ kkxikıkınktgter 

; XMOVE Puffer 

; texekerkrrakirer 


ı je 'groesser' gıeser Puffer ıst im so schneller wırd 
; zwischen sen Banken hın uni ner 'geschaufalt’ 

; 3 Dinge sind jecoch zu beachten! 

: Die Puffergroesse geht voll von ner TPA-Groesse an | 
; Der Putfer muss ım gemeinsamen Räk-kereich liegen 

; Eine Puffergroesse unter IM Bytes dringt kleinen 

; Gewinn ... das kann MVE vom EiniS gesteuert auch ... 


eu taken ‚ Pufferstart 
eu afcaah ı Pufferemgerl 
eau aftend-asovuf ; Putferlaenge 
‚ Kererkkrpkkrkrtr 

; CCP - Bank 

; kpckkpenkihrg 


ı fuer einen schnelleren WArtEiWT, wırd CCP.COM beim Kaltstart 
; auf Bank ® transferiert. Von oort wırd es nach jegem warnstart 
; geholt anstelle es jJegesmal von der Diskette zu lesen ... 


eu [0 ı In Bank ® 

eu Koeen ‚ Sort wırd CCP "zwischengeiagert’ 
equ La) , so 'lang' ist CCP 

; kütpkpnkkkakteke 

; Laufwerke 

‚ takackktkartgert 


; hier UNVERAENDEREARE Rechenwerte (Laufwerksbezeichnung) 
; einfache Dichte 


equ ! ı &zell 
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233 
234 


# Erroris) Detecten. 
190 Symbols Detecte. 
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5 
5 


t4ag 


ram 
nard 


adrıve 
birive 
cdrive 
drive 


eirıve 


eu 


eu 
eu 
eu 


5 
7 


4% Track 2-seitıs 
; 3% Track 2-5e1t1g 


; vorgesenen als KM-LıSK 
| vorgesenen als harmlısk 


hier gewuenschter Lautwerkstyp (MAKi-TEm)-Tirt usw) 
; unter gewienschten Laufwerk eintragen 
; Nicht belegte Lautwerke muessen mit. KEIN eingetragen wergen 


eu 
eu 
eu 
ei 


t&0g 
t30d 
nein 
nein 


; Laufwerk A 
; Laufwerk B 
; Lautwerk C 
; Laufwerk D 


‘ Laufwerk E ıst MR als RAt-bISr. (RAM) vorgesehen 


eu 


rein 


; Lautwerk E 


; Laufwerk F ist NR als HARD-DISK (mAklN vorgesenen 
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FAoo 
FCAO 


208 


218 


29 210 


218 


148 


167 


119 


“ 
146 


141 


163 


im 


54 
147 


169 


176 


ı7 


172 
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on MAXI 232 

020 MINIS 193 

Fauna MONSEG 32 

oa NEIN 43 23 243 253 
IF NEWLINE 72 

GR NULL 5 

ch READIG 15% 

28 READS 178 

och REAOT 18] 

3] REL Pe) 

3% REV Er] 

ia SDENS 194 

#419 SEEK 176 

1 SELA 187 

2 SELB 193 

od SELC 139 

603 SELD 1% 

eg SIDEZ 132 

16 SYN bh 

nF TAU Pe 

wo TE 27 26 247 
alaa TFA Ve) 
SFC VEAS 15 116 
LE URASI 123124 
BC URAS2 in 13213 14 15 
FE CM) 118 

WEE VCH 16 

CE LCMD2 134 

HÖRF UCON 119 

WER UCON 12 

ÜLF  LCONZ 135 

SBrC LDAT Ns 17 18119 
@ReC UDATI 14 1235 126 127 
BCE UDATZ 122 

0034 USR 3 

FD USTA 117 

MED USTAI 125 

CD USTAZ 183 

Mo VT 63 

AS WRITES 173 

FA WRITET 182 
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I uarkenkekkegkrkokekkekrkkheppprhsrpkhepgcrhkhrkkigpapckächrrgeng 

2 x x 

3 ıt rel 1.9 vom 47.01.85 Bi 

4 x x 

5 ;t Systemvereinbarungen Zeichen Ein/Ausgabe Schnittstellen 4 

6 ;* und Baudrate ( falls implementiert ) x 

7 x t 

3 SERRRESKRRKRERKREKKRRRRRSRRESKRRRIRRERRLÄRLHTERRRRERERRIERERKRKRE 

9 

18 u] mbsinput, equ BR ; EinsAkt Einheit 

N 172 absoutput, eu Bee ; AUSGABE Einheit 

12 [au R} rb$sınsaut. equ mosınputtscscutput ; Ein/AuSSAbE Einneit 

13 04 mbssoftinaud eu a ; Bawjrate ueber Sofiware waenidar 
(9) 14 BE mosserial eu le) ; Serienport evtl mıt Frotokoll 

15 LU) mosxonsxoff au 0) ; nıt xon/xoff Protokoll 

16 

17 i 

18 ; Baudraten beziehen sıch aırekt auf #351 Baustein in SER 

13 ’ 

20 

21 [0] baua$none eu b) ; keine Eaugrate 

22 9061 bauds5# En ie ; 58 baud 

23 em baua$75 eu Bei , 75 baud 

24 0003 bau#116 eu Kid ; 116 baud 

25 Od baucs1 34 equ alano ; 134.5 naud 

26 095 baud#15% eu Heid ; 159 baud 

2 AR bauds390 eu elle ; 2 baud 

3 97 baud$6ho EU Allid ; bOR Dauı 

29 [3 bauds! 200 eu 1er ; 120m baud 

$] Lane] baud$12%0 eu 1961b ; 1209 baud 

3 RA bauds24u0 eu 1elöb ; 240 bauc 

2 HR bauds 369 eu i6lio , 60 baud 

Re} oc baudt420 eu 11066 ; 4&0 bauc 

34 RD baud$7266 eu 116i0 , TA bau 

35 [4,3 bauds6a0 equ 1Nieb ; ed baud 

3 OO baud$19200 eu I11io ; 19.% baud 


% Error(s) detected. 
22 Symbols Detected. 
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03 BAUDSIIE 24 
98 BALDSI ZEN fe] 
ed BAUMSI24 25 
895 BAUCHISE ji 
er BAUOSISEG El 
Ger BAUCH 320 % 
BEA EAUDS240M Bi] 
eek EAULS3AH 27 
ie BAUUSEEAG 32 
RC BRUCHASER 33 
ea EAUDSLE fi 
0087 BAUCSERB 3 
Bil EAUDS7 ZUR 24 
0002 BAUCETS 23 
ie  BAUDSIEAA 3 
RR BAUDSMÖNE fi] 
3 MESInsÜUT 2 
Ha MERINPUT 16 2 
02 MESOUTPUT u 2 
0003 MESSERIAL 14 
4 MESSOFTSEAUD 13 
2010 MESXONSKOFF 15 
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i SERRHRRKKRIKEKKRSRRNE RER RRRHHÄRERKRRRRKRSERRRIERRER RER RIKRRKER HK 
2 ‚x x 
3 ;* Macro Detinitionens fuer (P/n3 BIOS x 
4 ‚x x 
5 * Autrutvereinbarungen k 
& x t 
? ;* Generierung car DRIVETÄRLE t 
3 x x 
$) ‚$ @atol! atbl <apnd,apnl,...> ; Name ger Xühl’s x 
18 ‚x L 
ı ;* Generierung der XüPn's (Farameter ın einer Zeile!) t 
12 E x 
13 ;# dphname! ph KLT-Tabelle,  ; zum Laufwerk i 
14 g DFB, ı zum Laufwerk k 
15 cnecksumssize, ; toptıonal) Li 
i6 N; allochsıze ; (optıonal x 
17 ‚x x 
13 ;$ um Fehler zu verseigen nıtte ale veigen letzten Parameter 
19 X weglassen - GENCFM.COM macht gas fuer uns i 
& n; x 
zZ ıt Generierung ger SkEw-Tatelle t 
22 N N: 
2 ;k xltname: skew  sectors, ; wieviel hat gie Disk? & 
24 x skewfartor, ; gen Faktor ? xt 
25 x firstssector  ; Beginn mıt Sertor (1) & 
»% ‚8 k 
27 % Generierung oes DISK-FÄRTAMETER-BLUCK (dpb) Ri 
23 ‚x x 
3 X dpbname! ph Saktorgrassse, ; pnysikalısch x 
E) ‘$ wıeviel$frack, ; vorne (+nınten) x 
si ‚x ?Tracks, ; pro Seite x 
32 7 Biock$groesse, ; ın Bytes (dezimal) &* 
32 Bi Cik-Eintraege, ; wieviel moeglich? X 
34 ’* Systemspuren  ; reservierte Tracks X 
3 Bi X 
3% 1.5 37733557773737777757777737773749 419777729 77777772777999742993773 
Kr 

8 i 

$>] IE 739 5333733377777777377377 7779277 

48 ; Lautwerkstabelle (UTbL) 

Ä ; RRERRRRRRKRERKERRIRKRAR KL KH AHA H RE 

4 ı 

[R) 

4 ; 

45 ‚ enthaelt immer 15 Eintraege, unbenutzte Laufwerke 

4 ; werden nıt # Eingetragen 

47 a 

# 

4 otol Macro ?lıst 

5 local ?n 

Bj ?’n del 8 

52 Irp ?drv, (?list> 

3) ?n del ml 

54 gefw  ?drv 

Ss enca 

5 rept  (16-’n) 

57 av 8 

53 enia 
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sg enon . 

bh 

6 i 

62 ; RRARLISRLHRRSKHRÄR HER RR RR H RIFF 

63 ; XbFH-Macro 

64 ; RRRtErhRReHALIR Re a Hehe RR LEE KHK 

55 r 

bb 

67 cn macro trans, ?opn, ’csıze,Tasıze 

63 local ?csv,?aiv 

69 aelw  ?trans ; Adresse der Skry-Tabelle ÜLTI 
79 aerb 9,0,6,6.9,9,6,9,% ; EiS Bereich 

N ot 1 ; Meaıa-tlag 

172 geiw po ; Aarasse nes [FB 

73 

74 if not mul ?csıze 

75 

76 oefw  ?esv ; taptıanal) Inecksum-Vektar 
7 

78 else 

73 

Bi a -2 ; (SV wırd von GEneFM eıngetrasen 
2 

&2 enaif 

23 

54 ıf mat nul ?asıze 

85 

6 etw Talv ; (optional) Alincation-Vaktor 
37 

8 else 

33 

» Di Ber ; ALV wird von GENCFM eingetragen 
9 

“2 enaıf 

3 

ER am -2,-2,-2 ; DikeCE,DTARCR, HASH ung HASH-Bank 
3% ar ı wırd von SENCPM eingetragen 
% 

4 if mot nul ?reıze 

# 

49 %csvi deis ?esıze ; Checksum-Vektor 

199 

tel enaıf 

192 

103 if net mul ?asıza 

194 

145 Malv: defs ?asıze ; Allocatıon-Vektor 

196 

187 endıf 

198 

149 end 

110 

11 s 

112 ; RERRSRERRIERERRRRRRRRRARKRIS RK 

113 ı DEF-Makcro 

114 IB 3 369337997179 1774 7979979999 79771 

115 i 

116 
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CPn3 


117 
118 
119 


289 20 Dec 85 09:44 


local ?spt,?bsh, ?bin, ?exa, ?dsa,?dra, ?al9, ?all,?cks,?psh, ?psm 


Mi 
‘ı physikalische Sektor-Maske uma physikalischer Sektor-snıft 


;; passt nıcht mıt Ik Blocks 


opb macro ?psize, ?pspt, ?trks, ?bls, ?naırs, ?otf,ncks 
local ?’n 
"sh defl 4 
?n defl  ?psize/l23 
m dl ml 
rpt 8 
?’n deil n/2 
if neq9 
exita 
endıf 
"sh del ?pshtl 
enza 
?spt derl  ?psptätpsize/l2si 
"sh el 23 
?n oefl  ?bıs/1924 
ret 8 
?'n aefl ?’n/2 
if ’neqa 
exıta 
endıf 
"sh del  ?bshrl 
enin 
"bin oefl ?bls/129-1 
size defl  (?trks-roffit?spt 
?da defl ?size/ilbls/12R)-1 
em defl ?bls/1024 
if ?dsm gt 255 
if ?bls eq 1824 
exita 
endıf 
"em defl ?em/2 
endıf 
!em defl ?eml 
all dfl 9 
?n del Cndirsi2#H?bls-1/?bls 


rept ?’n 
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175 all defl (Mall shr I) or Ken 

176 enin 

177 ?ala defl hıyn ?all 

178 all defi dow ?all 

179 ?gra defl  ?mırs-i 

159 

131 if nat nul ?ncks 

132 

153 ?cks oetl  ®ncks 

134 

135 else 

135 

187 ?cks deti ?maırs/d 

153 

189 engıf 

19 

191 oetw  ?spt ; 128 Eyte (log)-Sektoren pra Track @) 
192 deip  ?bsh, ?bim ; Block-shıft umd Maske 
143 af  Texn ; Extent-Mmaske 

194 defw  ?asm ; Maxınale Biock-Anzanl 
195 defw  ?drm ; Maximale Din-tintraege 
196 derb ?ala,?all ; Belegungs-vektoren 
197 defw  cks ; Prustsumme 

138 Jefw  ?off ; Reservierte Tracks (System) 
199 oeto  ?psh,?psm ; (pnys)-Sektar hroesse- & Shıtt-aske 
zu en 

20) 

u r 

293 stekkkrgkkkrkkker 

AM ; mılfsmacros . 

5 3333773777 7777 71 

Zu i 

7 

ZUR gcd macro ?m,?n 

203 

218 BR 

au ‚, Groesster gemeinsame Teiler von a,n 

212 ;; Ergebnis ın Variabler GCDN 

213 br 

214 

215 ?gcin detl ’m ;; Varıabie » 

216 ?gcin nefl ?n ;; Variable n 

217 ?gcdr deil [) ;; Varıable r 

218 rept 65535 

219 ?gcik detl  ?geda/?gcan V 
29 ?gcdr defl ?gedm-?gedek?gein 

221 if ?gedr eq # 

22 exiia 

223 endıf 

224 ?gcdn defl  ?gcan 

225 ?gcin detl ?gcdr 

226 en 

227 encm 

228 

229 h 

29 DR 9335335559577 53 4 

231 ; Macro fuer SKEW 

232 ; SEKREEKERKERRRE 
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ZEONSM SuperFast, Relocating Macro Assentler 29 Dec 85 e945 Zain 1.24 Page 5 
Cn3 250 26 Dec 35 09:44 


233 i 

234 

235 sken macro ?secs,?skf,?fsc 

236 Inxtsec afl 9 ;, Naechster Sektor 

237 ’nxtoas tl 9 »; +1 bei leberlauf 

23 gcd Yrsecs, ?skf 

239 

244 [zZ 

24i Hr ?gedn = gedi ?secs, skew) 

242 

243 

244 !neltst oetl ?secs/?gcm 

245 

246 

247 ‚; NELTST ist gie Anzahl der zu generierender Elemente 
® 243 ‚ bıs ein Eiement wiederholt wuerde 

243 I 

250 

25] ?nelts oetl  ?neltst ıı Zaehler 

252 rept  ?sers ‚; einmal pro Sektor 

253 defb  nxtsect?fsc 

254 nxtsec defl  ?nxtsect?’skf 

hr, 

256 if nxtsec gt ?secs 

257 

2583 nxtsec gefl  nxtsac-?secs 

259 

268 endıf 

261 

262 nelts defl  ?nelts-1 

263 

264 if ?nelts eq # 

265 

265 Inxtbas detl  Inxtoast| 

267 ?nxtsec defl  ?nxtbas 

268 nelts detl  neltst 

263 

279 endıf 

27 ena 

272 endh 

273 


# Error(s) Detected. 


(9) 5 Symbols Detecten. 
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ZEONSM SuperFast Relocating Macro Assemoler 23 üec 85 w9:4n ZEASM 1.24 Fage 5 
Cross Reference: 


Bd DPR 117 
Wo PH 67 
ee DTEL 43 
Br CC 203 
ed SKEW 255 
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Kapitel 12 Generierung der Datei CPN3.8Y5B 


Voraussetzung ist das Vorhandensein eines CP/M Computers. Es muß 
sich dabei nicht notwendigerweise um einem CP/M 3 Computer 
handeln (praktischer wäre es aber schon). 


Zur Generierung müssen folgende Programme zur Verfügung stehen: 


1. Die Dateien RESBDOS3.SPR und BNKBDOS3.SPR, dies ist der von 
Digital Research gelieferte BVOS-Anteil an CP/M 3. 


2: Ein Macro-Assembler wie Z80ASM.COM oder M80.COM. 


3. Der CP/N-Linker LINK.COM (L80.COM ist nicht so ohne wei- 
teres geeignet). 


4. Das Programm GENCPM.COM das zum Lieferumfang von CP/N 3 
gehört. 


5, Ein Editor und evtl. ein Debugger (z.B. ZSID). 


6. Alle BlOS-Dateien, wie sie in den vorangegangenen Beispielen 
gezeigt wurden oder die ensprechenden Gegenstücke wie sie 
mit einem CP/M 3 System mitgeliefert werden sollten. 


Es kann möglich sein (siehe hierzu die Computer-Unterla- 
gen), daß einige BlOS-Segmente nur als REL-Datei geliefert 
wurden, und nur z.B.CHARIO wird mitgeliefert - zur Anpas- 
sung neuer Schnittstellen. Meist können alle 'restlichen' 
Dateien aber extra bestellt werden. (Man sollte dies tun, 
denn damit hat man das System besser in der 'Hand’, wenn 
man jemals vor hat Erweiterungen vorzunehmen.) 


Ya Kenntnisse im Programmieren auf Assemblerebene, wenn es 
darum geht ein 'Fremdsystem’ anzupassen. 


Sind alle genannten Voraussetzungen erfüllt, die einzelnen Pro- 
gramm-Segmente fehlerfrei und noch genügend Platz auf der Disket- 
te kann die Generierung der Datei CPM3.SYS beginnen: 


1.Schritt: 


Die Dateien SCB,BIOSKRNL,CHARIO,MOVE,DISKIO und BOOT 
assemblieren (oder eben die Dateien die mitgeliefert 
wurden). Die Zieldatei sollte eine REL-Datei sein. 


2.Schritt: 


Alle Dateien werden zusammengelinkt mit dem Programm 
LINK.COM. Dies geschieht mit folgender Syntax: 


LINK ENKBIGS3LEI=SCR, BIOSKRNL , CHARIO, MOVE DISKIO, BOOT 


Mit diesem Vorgang wird die Datei BNKBI10S3.SPR 
generiert“, der komplette BlOS-Anteil an CPM3.SYS. 


3.Schritt: 


Es werden nun nur noch die drei genannten SPR-Dateien 
und das Programm GENCPM.COX benötigt. Die SYS-Datei 
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wird durch einfaches Aufrufen von GENCPM generiert. 

Hierzu werden von GENCPM jedoch viele Fragen (leider 

auf knglisch) gestellt. Ein entsprechender Dialog 

zeigt das folgende Beispiel: . 

Die Übersetzung der englischen Texte wurde zur besseren 
Übersicht durch drei Sterne (III) am Beginn hervorgehoben. 


Das Programm GENCPM meldet sich wie folgt: 


CP/M 3.9 System Generation 
Copyright (C) 1982, Digital Research 


Default entries are shown in (parens). 
Default base is Hex, precede entry with # for decimal 


Use GENCPM.DAT for defaults (Y) ? _ 


XIX Die Kopfzeile benötigt kaum eine Übersetzung 
darunter 

XXI Vorgabewerte sind in (Klammern). 

ıXX Vorgabebasis ist HEX, # voranstellen für Dezimal 
und gleich die erste Frage: 

ıXı soll GENCPM.DAT zur Vorgabe verwendet werden? 


diese Frage taucht nur auf, wenn die Datei GENCPM.DAT auf der 
Diskette zu finden ist. Ist diese Datei vorhanden, sollte sie auf 
alle Fälle gesichert werden. Es folgt die Frage: 

Create a new GENCPM.DAT file (N) ? 

XXX soll eine neue GENCPM.DAT Datei eröffnet werden (N) ? 
diese Frage muß mit 'Y' (ja) beantwortet werden, ist es nicht 
erwünscht, genügt ein <cr>, es kann natürlich auch ein 'N' einge- 
geben werden. 


Eine Neueröffnung bietet den Vorteil später mit GENCPM AUTO 
arbeitet zu können - gleichzeitig hat man ein Protokoll. 


Alle Daten werden in der Datei GENCPM.DAT unter einem Label 
(Namen) abgelegt, die Datei kann im Übrigen mit TYPE auf die 


Konsole oder den Drucker ausgegeben und/oder mit einem Editor 
bearbeitet werden. 


Die Variablennamen werden in den nachfolgenden Beispielen immer 
als 'DAT-Variable’ angeführt. 


Wir beantworten in unserem Beispiel die Frage mit 'y’ (=ja) 


Die DAT-Variable heißt CRDATAF 
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Es folgt die Frage: 
Display Load Nap at Cold Boot (Y) ? 
XXX Ladewei'te beim Booten ausgeben (Y) ? 


mit dieser Frage ist gemeint, ob beim Kaltstart die Speicherzu- 
weisung ausgegeben werden soll. Dies könnte wie folgt aussehen: 


RESBIOS3 SPR F600H ®600H 

BNKB1OSS3 SPR B1®0H OFOOH 

RESBDOS3 SPR F®00H ®690H 

BNKBDOS3 SPR 8700H Z2AOOH 
und gibt die Startadressen des residenten (RES) BDOS und BIOS an, 
also die Programmteile, auf die von allen Banken aus zugegriffen 
werden kann, während die ge’bank'ten Programnteile (BNK immer 
auf Bank ® zu finden sind. 


Ob diese Information dem Benutzer beim Kaltstart nutzvoll ist; 
sei ihm selbst überlassen. 


Beantwortung der Frage mit <cr> oder 'Y' bedeutet Ja, mit 'N 
bedeutet Nein. 


DAT-Variable: PRTNSG 
Weiter geht es mit der Frage: 
Number of console columns (#80) ? 
XXX Anzahl der Zeichen pro Zeile (#80) ? 


Diese Frage bezieht sich auf die Zeichenanzahl bei der Ausgabe 
von Zeichen auf die Konsole (bzw. dem Bildschirm ). 


Terminals mit z.B. 64 Zeichen pro Zeile können hier angepaßt 


werden. Terminals, die mit dem 88. Zeichen eine <cr)>-<lf> Kombi- 


nation ausgeben, sollten auf 79 Zeichen pro Zeile angepaßt 
werden. 


Anmerkung: 


Diese Definition bezieht sich nur auf CP/M mit seinen eigenen 
Unterprogrammen, nicht auf andere Programme wie z.B. Wordstar (R) 


DAT-Variable PAGWID 
Die nächste Frage lautet: 
Number of lines in console page (#24) ? 
XXX Anzahl der Zeilen pro Seite (#24) ? 
Dies hängt von der verwendeten Software ab. üblich sind 24 


Zeilen. Die Statuszeile, wie sie von manchen Terminals oder 


Video-Kartentreibern zur Verfügung gestellt wird, zählt in diesem 
Zusammenhang nicht. 


DAT-Variable PAGLEN 
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Veiter mit der Zuweisung von <backspace> und <DELete> 
Backspace echoes erased character (N) ? 

XIX backspace soll das letzte Zeichen wiederholen (N) ? 
Öblich ist 'Nein' - <cr> oder N sonst 'Y' 
DEL-Variable BACKSPC 
Rubout echoes erased character (Y) ? 

IX DEL soll das letzte Zeichen wiederholen (Y) ? 


vblich ist es bei DkL(ete) das gelöschte Zeichen noch einmal 
auszugeben. 


Dies stammt noch aus der Zeit, als die Konsolenausgabe noch nicht 
über Bildschirme, sondern über Drucker (oder Fernschreiber) ge- 
macht wurde und diese konnten damals kein Backspace - wie sollte 
man also sonst ein erfolgtes Löschen darstellen. 

Heute ist es angenehmer DEL wie Backspace zu behandeln. 


<er> oder 'Y’ veranlaßt eine Zeichenwiederholung, ein 'N' behan- 
delt DEL wie Backspace. 


DEL-Variable RUBOUT 
weiter mit: 
Initial default drive (A:) ? 
XXX welches Boot-Laufwerk (A:) ? 
diese Frage ist mit <cr> zu beantworten, wenn das verwendete 
Monitorprogramm auf Laufwerk A bootet. Dies dürfte die tbliche 
Bootversion sein. 
DEL-Variable BOOTDRV 
Es geht nun an die Zuweisung der Speicherbereiche: 
Top page of memory (FF) ? 
XXX Oberster RAM Bereich in Seiten -10®H- (FF) ? 
Bei der Zuweisung sind 3 Dinge zu beachten: 
1. Das MOVE-Fenster für Programm-Transfer zwischen den Banken 
2, Ein evtl. notwendiger Vektor-Bereich für Interrupts und 
3. Ein evtl. vorhandener Puffer für ein VIDEO-Treiber 


Das KMOVE-Fenster hat am günstigsten eine Größe von 1k, da dies 
auch die Größe eines Sektors ist. 


Fenster unter 1®0H bringen keinen Gewinn, denn ein 80H Fenster 
ist in SCB definiert und liegt sowieso im gemeinsamen RAMN- 
Bereich. 
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Andernseits ist es der Wunsch vieler Benutzer einen TPA-Bereich 
von 6®k zu haben, obwohl dies bereits mehr ist als CP/M2 in der 
'normalen'’ single-density Version hat, denn unter CP/M 3 ist 
wirklich TPA gemeint, also den RAM-Bereich der dem Anwender zur 


Verfuegung steht. Jede extra Speicherzuweisung geht also von der 
TPA-Größe ab! 


Achtung: 


Das Programm GENCPM kann bei der Speicherzuweisung einen Run- 
dungsfehler machen. Um dies zu umgehen ist es wichtig im letzten 
Programmsegment zusätzlich 100H Bytes zu reservieren. 
DAT-Variable MEMTOP 
Nächste Frage: 
Bank-switched memory (Y) ? 

XXX gebanktes RAM (Y) 


Die größten Vorzüge hat CP/M3 nur im gebankten System. Sie sol- 
lten die Frage also mit <cr> oder 'Y' beantworten. Die gezeigten 
Assemblerprogramme sind im Übrigen alle für ein gebanktes System 
geschrieben. 


Nur wenn obige Frage mit Y beantwortet wurde, werden übrigens die 
nächsten Fragen gestellt: 


DAT-Variable BNKSWT 
Common memory base page (CP) ? 
XXX Beginn des gemeinsamen RAN-Bereichs (C®) ? 


Gemeint ist hier weniger der effektive Beginn des gemeinsamen 
RAM-Bereiches, vielmehr das mögliche ENDE des gebankten Bereiches. 


Hierzu folgendes: 


In der ausgelieferten Version wird der CCP in Bank ® auf den 
RAN-Bereich D®00-DFFF transferiert ( DEFAULT.INC ). 


Es ist anzunehmen, daß GENCPM auch hier einen tberlauf- 
fehler hat, daher ist in der ausgelieferten Version der 
gemeinsame Startbereich auf C0<00>H gelegt. 


Anmerkung: 


Die Größe des gemeinsamen RAM-Bereichs hat nicht direkt etwas mit 
der Größe der TPA zu tun, bei einen gemeinsamen RAM-Bereich von 
8K kann sehr wohl eine 6®K TPA vorhanden sein, sind alle (nach- 
folgenden) Zeiger richtig gesetzt, geht lediglich in den Banks ® 
und über der TPA-Bank (1) Speicherplatz verloren. Hierzu muß bei 
der (nachfolgenden) Definition lediglich der Speicherbereich ab 
E00 im Bankbereich ausgeklammert werden. 


DAT-Variable COMBAS 
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Nächste Frage: 
Long error messages [6 2) 7 

XXX Ausführliche Fehlermeldungen - in Englisch - (Y) ? 
Auf Wunsch kann CP/M3 hier recht exakte Fehlermeldungen ausgeben, 
die dem Computerlaien jedoch kaum etwas sagen, ja eher zur Ver- 
wirrung beitragen. Die Entscheidung bleibt beim Anwender. 
DAT-Variable LERROR 
Nun wird die erste Frageserie mit: 
Accept new system definition (Y) ? 

XIX werden diese neuen System-Definitionen akzeptiert (Y)? 


beendet. 


Mit einem 'N' geht das ganze Fragespiel von vorne los, ein <cr> 
oder 'Y' leitet zum Ausdruck des Textes: 


Setting up Allocation vector for drive A: 
Setting up Checksum vector for drive A: 
Setting up Allocation vector for drive B: 
Setting up Checksum vector for drive B: 


ı1ı2 Bank 1 and Common are not included III 
XIX in the memory segment table Lrı 


Dies deutet an, daß die Belegungsvektoren (Allocation) und die 
Prüfsummen-Vektoren für die Laufwerke A: und B: in Bank ® reser- 
viert ( und belegt > wurden. 

GENCPN übernimmt diese Reservierung für alle Laufwerke, die in 
DRVTBL zugewiesen sind und in deren XDPH < siehe dort > eine 
entsprechende Zuordnung durch GENCPN verlangt wird. 


Es geht nun weiter nit der Speicherzuweisung in den Bankbe- 
reichen: 


Number of memory segments (#3) ? 
XXX Anzahl der Speicher Segmente (#3) ? 


diese Frage wird nur gestellt, wenn die Frage nach dem Banking 
mit 'Y' beantwortet wurde. 


Hier können nun die BANK's oder auch Speichersegmente eingegeben 
werden ( bis zu 15 ). 


Anmerkung: 


Nicht mitgezählt werden darf jedoch Bank 1, da diese Bank die 


sogenannte TPA Bank ist ( also die Bank, in der die Programme 
ablaufen ... sollten ). 


Darüberhinaus darf der Speicherbereich, der dem (gebankten) BDOS 
und BIOS zugeordnet ist, hier nicht nocheinmal zugewiesen werden. 
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GENCPM verwendet die Speichersegmente als Puffer und für die 
HASH-Code-Tabellen. 


DAT-Variable NUMSEG 


Danach folgt die Frage nach der speziellen Zuweisung, zuerst nit 
der Information von wo bis wo eigentlich CP/M liegt: 


CP/M 3 Base,size,bank (8C,34,00) 


d.h. CP/M 3 beginnt (Base) bei 8C00H, ist 3400H Bytes lang (size) 
und residiert auf Bank ® (bank). 


Beachten Sie bitte: 8C00H+3400H ist C®00H (oder das was wir als 
COMBAS vorgegeben haben!). 


Der Bereich ®...8C0® kann nun CP/M zugewiesen werden nach der 
Frage: 


Enter memory segment table: 
XXX Bitte Segment-Zuweisung eingeben) 
Base ,size,bank (00,80,00) 
ein <cr> genügt, wenn der Bereich so belassen werden soll. 
Wurden bei NUMSEG mehrere Segmente vorgegeben so wird nun für 
jedes Segment die Frage nach der entsprechenden Speicherzuweisung 


gestellt. 


Bitte beachten: Der gemeinsame RAM-Bereich muß immer ausgeklam- 
mert bleiben ( d.h. COMBAS ist immer RAN-ENDE ). 


DAT-Variable(n) MEMSEG®®.. .MEMSEGOF 


Ist die Zuweisung erfolgt, gibt GENCPM noch einmal die Bereich 
an: 


CP/M 3 Sys 8C00H 3400H BANK 00 
Menseg No. 00 000®H 8000H BANK ®® 


usw. wenn mehrere Segmente definiert wurden. Danach die Frage: 
Accept new memory segment table entries (Y) ? 

XXX neue Speicherzuweisung akzeptiert (Y) ? 
mit <cr> gehts weiter, mit '’N' gehts von vorne los. 


Setting up directory hash tables: 
Enable hashing for drive a: (Y) ? 


XXX Zuweisung der Hash-Tabellen : 
XXX Hash Tabelle für Laufwerk A: (Y) ? 


steht 'nur’ eine Bank zur Verfügung kann meist nur für 2 Lauf- 
er eine Hash-Tabelle zugewiesen werden, diese liegt immer in 
ank ®. 
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Die Belegung der Hashbuffer und die Zuteilung der Hash-Bank wird 
von GENCPM nur dann. übernommen, wenn im entsprechenden XDPH 
(siehe später) ein FFFE eingegeben wird. 

DAT-Variable HASHDRVA....HASHDRVP « Laufwerk A bis P ) 
Danach werden wieder Informationen ausgegeben: 


Setting up Blocking/Deblocking Buffer 
The physikal record size is 40H 


Available space in 256 byte pages 
TPA = ®0F0H, Bank ® = 0078H, other banks = 0000H 


XXX Belegung des Blocking/Deblocking-Puffers 
XII die physikalische Blockgröße ist 480H (das ist 1K) 


IX Verfügbarer Speicherplatz in 256 Byte Seiten 

ıXıX TPA = 00FOH, Bank ® = 0078H, andere Banks = ®000H 
Die nachfolgenden FEragen sind nun recht unterschiedlich zu be- 
antworten, mit entsprechend unterschiedlichen Ergebnissen. 
Es kann die Größe von zwei verschiedenen Puffern vorgegeben 
werden, die im gebankten Bereich liegen. In diese Puffer werden 
zum einen die Directory und zum andern Daten eingelesen. 
Je größer die Puffer definiert werden, umso mehr (und unso 
schneller) kann auf einmal eingelesen werden. Bei nur einer Bank 
ist die Kapazität natürlich schnell erschöpft. 
Zu beachten ist darüberhinaus, daß der Pufferbereich für das 
Inhaltsverzeichnis NUR in Bank ® angelegt wird, bei vielen Lauf- 
werken kann es da schon einmal 'eng’' werden. 
Die ersten Fragen betreffen Laufwerk 'A’, dieses sollte u.U etwas 
bevorzugt '’behandelt' werden, da dieses Laufwerk am meisten be- 
nutzt wird: 
Number vor directory buffers for drive A:(#1) ? 

XXX Anzahl der DIR-Puffer für Laufwerk A:(#1) ? 
Die Frage kann mit bei 2 Laufwerken mit #8 beantwortet werden, 
beachten Sie aber bitte die jeweils folgenden Angaben über den 
'restlichen’' Speicherplatz. 
DAT-Variable NDIRRECA...NDIRRECP 
Es folgt: (nach der Restspeicherangabe, wie oben übersetzt) 
Number of data buffers for drive A:(#1) ? 

XIX Anzahl der Daten-Puffer für LW A:(#1) ? 
Auch diese Frage kann mit #8 beantwortet werden. 
DAT-Variable NDTAKECA...NDTARECP 


gleich danach wird gefragt: 
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Allocate buffers outside of Common (Y) ? 


XXI Allocation-Puffer ausserhalbe des gemeinsamen 
Bereiches verlegen (Y) ? 


Diese Frage beantworten Sie bitte mit 'Y'’, sonst wird nur die TPA 
unnötig verkleinert. 


Im anderen Falle sind die Allocation-Vektoren zwar aus der TPA 
heraus zwar zugänglich, aber da dies nicht immer der Fall sein 


muß, nützt diese Kenntnis eigentlich wenig, ausser für Sonderan- 
wendungen. 


DAT-Variable ALTBNKSA...ALTBNKSP 


Diese '’Fragerei' geht nun für alle eingebundenen Laufwerke 
weiter. 


Werden Fehler bei der Beiegung gemacht, so meldet GENCPM dieses 
mit: 


ERROR: unable to allocate ........ buffer space 
XIX FEHLER: kann ...... Pufferplatz nicht zuweisen 
wobei anstelle ’...... ' angegeben wird, ob es DIR oder Daten- 


puffer ist, der nicht zugewiesen werden kann. 
Ist alles zugewiesen und von GENCPM akzeptiert, folgt die Frage: 
Accept new puffer definitions (Y) ? 

XIX ist neue Pufferdefinition akzeptiert (Y) ? 


Sind Sie damit zufrieden genügt ein <cr?, wollen Sie noch weitere 
Möglichkeiten probieren geben Sie ein 'N' ein. 


Haben Sie die Frage mit ’Y' oder <cr> beantwortet gibt GENCPM die 
gültige Speicheraufteilung aus: 


BNKB10S3 SPR F600H ®800H (also von F6®®H..FDFFH ) 
BNKB1OS3 SPR B800H 0800H (also von B8®®H..BFFFH ) 


RESBLOS3 SPR FO00H 0600H (also von F®®®H..FSFFH ) 
BNKBDOSS SPR 8B®00H 2DOOH 


1XX CP/N 3.0 SYSTEM GENERATION DONE XXX 


IXX CP/M 3.0 System Generierung abgeschlossen 


Der Vollständigkeit halber, ist nachfolgend nocheinmal ein 
kompletter Durchlauf (mit PUT aufgezeichnet) abgedruckt. 
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Eögencpn 
CP/M 3.6 System Generation 
Gopyrignt (C) 1982, Digital Research 


befauit entries ara snow ın (parens). 
Letault base is Hex, preceoe entrv wıtn # for oecınal 


use GENCPM.CAT far gefauıts (VD ?n 
(Create a new GENÜFM.DAT file im) ? y 
vuıspiay Load Map at Cola Boot (YI ? y 
kumber of consale columns (m) 7 00 
Mumper of lınes ın console page (#24) ? #24 
Backspace echoes erasad character iN) ?n 
Rubout echoes erasad character (Y) ’n 
initial default drive (A!) ? der» 

Top page of memory iFF} ? fa 

Bank switcheg memory (Y} ? y 

Common memory base page ı{#) ? ch 

Lang arror messages (YI ? y 

Accapt new systen aefınıtıan (N) ? y 
Setting up Allacatıan vector for arıve A' 
Sattıng up Checksum vectar for arive A: 
Setting up Allocatıon vecter for grıye &: 
Setting up Checksum vactar for arıve E: 


+4 Bank | and Common are not, ıncluneg k#& 
444 In {he memory sagment tanıe [373 


fumber at memory segments (#3) ? ] 
(PIM 3 Base,sıze,bank {30,33.06) 


Enter memory segeent. table: 
Base,size,bank (40,0 u) ?er) 


Er/M 3 Sys ER IHM Bank im 
Memsag No. 09 Dadan Erd Bank du 


Accept new menory segment table entrıes if) ? y 
Setting up directory hash tables: 


Enable hashıng for drive A: (Y) ? y 
enable hashıng for drive B: (Y) ? y 
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Tne physical record size is A4mah: 


Available space in 256 byte pages: 
TPA = @ueFH, Bank @ = WER, Otner banks = snaaH 


Number of dırectory buffers for drive A: (#1) 73 


Avaılable space in 256 byte pages: 
TPA = @EFH, Bank 6 = @657H, Other banks = mAh 


Nusber of data butfers for drive A: (#1) ? 8 
Allocate buffers outside of Common IN) ? y 


Available space in 256 byte pages: 
TPA = @EFH, Bank 0 = 09374, Other banks = Boah 


Nuber of directory butfers for drıve B: (#1) ? 8 


Available space in 256 byte pages: 
TPA = @EFH, Bank @ = @16H, Other banks = AutaH 


Number of data buffers for drive B: (Bi) ? 3 
Allocate butfers autsıde ot Common (N) ? y 


ERROR: Umable to allocate Data Jeblocking buffer space. 
tıkX da passte wohl was nicht - das Menue beginnt von nauem ktx 
The physical record size is #490h: 


Avaılable space in 256 byte pages: 
TPA = @bEFH, Bank 0 = 04784, Other banks = BmaaH 


Nusber of directory buffers for drive A: (#8) ? 2 


Available space in 256 byte pages! 
TPA = @REFH, Bank @ = 30574, Other banks = AdmdH 


Number of data buffers for drive A: (#9) ? 8 
Allocate buffers outside of Comeon (Y} ? y 


Available space in 256 byte pages: 
TPA = @EFH, Bank © = #637H, Otner banks = PRaAH 


Number of directory buffers for drive B: (#3) ? 4 


Available space in 256 byte pages: 
TPA = @EFH, Bank ® = @026H, Other banks = AAA0H 


Number of data buffers for drive B: (#8) ? 4 
Allocate buffers outside of Common (Y) ? y 


Available space in 256 byte pages: 
TPA = @EFH, Bank 9 = @I6H, Other banks = AAAGH 
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Accept new butfer definitions (Y) ? y 
B&BIUS3 SPR FSOOn Aemah 
ENKBICSE SPR BAGOH Oak 
RESBDOS2 SPR EFORH AGaöH 
ENK USE SFR BCHah ZEöAM 


as CP/M 3.6 SYSTEM GENERATION DONE kax 
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TEIL V Einblicke, Besonderheiten und Ausblicke 
Einblicke auf die Diskette 


... nun noch das besondere 
Interrupts und RAM-Floppy 


Ausblicke - oder was kommt danach 


155 
163 


175 
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Kapitel 1 Binblicke auf die Diskette 


Es wurde in den vorangegangenen Kapiteln viel über Inhaltsver- 
zeichnisse gesprochen und über Tracks, Sektoren usw. Es ist an 
der Zeit, sich einmal im wahrsten Sinne des Wortes ein Bild davon 
zu machen wie das den wohl ’wirklich’ aussieht. 


Das nachfolgende Beispiel zeigt einmal den Inhalt der ersten 8 
Zeilen eines Inhaltsverzeichnisses. 


9: 0053 5441 SAAC 434k A549 443 Ohm RAS .STATLINEING...E 
IB: 1000 1108 1200 1200 1A0D GR OR EEE nennen 
DU: DSG 3933 2636 020 2052 ASAC AERO E07 VEIEE RkL.... 
20: 160m OO OA CAR BER BER BER os 
4: 8552 4543 A1AC MC20 Z05R 280 DUMR WO REAL ZUR... 
50: 1700 100 Ol BORD BER BER RER ER een 
59: 052 4543 A1AC ACZO 2043 CA BR DEM} RECALL CN... 
70: 211 Mm a BO 


Acht Zeilen wurden deshalb gewählt, weil sie gerade dem Inhalt 
von einem logischen Sektor (128-Bytes=80H-Bytes) entsprechen. 


In diese Sektorgröße passen 4 DIR-Einträge falls, das Inhaltsver- 


zeichnis nicht mit INITDIR 'vorbehandelt’ wurde, andernfalls nur 
3 Einträge. 


Das Beispiel soll nun einmal näher untersucht werden: 


Die jeweils ersten 3 Spalten sind relativ uninteressant, sie 
stellen lediglich die relative Adresse des ersten Bytes nach dem 
Doppelpunkt dar. Die jeweils folgenden Bytes entsprechen demnach 
den (relativen) Adressen 01,02 ... 11,12 bis 7F. Alle Angaben 
sind übrigens in HEX (also Basis 16). 


Jeweils 2 Zeilen (also von ®®...1f, 29..3f usw.) entsprechen 
einem FCB (File Control Block). In diesem FCB sind alle Angaben 
enthalten, die das BbOS über eine bestimmte Datei wissen muß. 


Diese Angaben sollen nun nachfolgend analysiert werden. Beginnen 
wir mit der ersten Datei: 


Byte 20 hier sind folgende Einträge möglich: 


00..®F Dies gibt die USER-Ebene an, in welcher die 
Datei abgespeichert wurde. (®0=9,01=1 usw) 


20 Gibt an, daß nachfolgend der Diskettennanme 
eingetragen ist. (nur in einem erweiterten 
Inhaltsverzeichnis möglich) 


21 Bezeichnet den Zusatz-FCB für jeweils 3 DIR- 
Einträge in einem erweiterten Inhaltsver- 
zeichnis. 
E5 Bezeichnet eine gelöschte Datei. 
Byte 0®1..98 Ab Byte 1 folgt der Dateiname. Dieser muß 


immer in Großbuchstaben eingetragen sein. 
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Der Grund liegt darin, daß der CCP_ grund- 
sätzlich alle Eingaben vor der eigentlichen 
Abarbeitung in Großbuchstaben umwandelt. Kin 
Dateiname in Kleinbuchstaben könnte also 
niemals aufgerufen werden, er könnte nicht 
einmal (so ohne weiteres) aus dem Inhalts- 
verzeichnis gelöscht werden. 


Der Dateiname darf bis zu acht Buchstaben 
lang sein. Ist der Name kürzer, muß der Rest 
mit Leerzeichen (20H) aufgefüllt werden. 


Byte 0®9..08B Es folgt der Index. Er darf 3 Zeichen lang 
sein, im übrigen gilt auch hier das für den 
Dateinamen gesagte. 


Byte 0C Dies ist das sog. EX(tend)-Feld. Ist eine 
Datei größer als 16k, wird für jeweils wei- 
tere 16K ein sog. EX(tend) angelegt. Da- 
runter ist ein weiterer FCB mit gleichem 
Dateinamen zu verstehen, der die jeweils 
nächsten 16K 'verwaltet’. 


Es sind bis zu 32 EXtends möglich (®0..1f). 
Die entsprechende kXtend-Nummer wird in 
diesem Feld abgelegt. Dies bedeutet im tbri- 
gen, daß unter CP/M 3 die maximale Größe 
einer Datei 512K betragen kann. (32I16K) 


Byte ®D..®E Diese Felder werden vom BDOS für interne 
Zwecke benötigt. Sie müssen im Inhaltsver- 
zeichnis auf NULL gesetzt sein. 


Byte ®F ist das sog. RC-Feld (record-count).Darunter 
ist ein Zähler zu verstehen, der genauere 
Angaben über die Dateigröße macht, die Zahl 
bedeutet nämlich nichts anderes als die 
Dateigröße in logischen (128-Byte) Sektoren. 


Es sind Einträge von 00..80H möglich. 00 
würde einen Leer-FCB bezeichnen (also nur ein 
Namenseintrag, aber keine abgelegten Daten) 
und 80H würde die max. mögliche Dateigröße 
eines EXtends bezeichnen. 


(16K=128(80H)X128(log Sektor). 


Die Angaben in den Bytes 0®..®F entsprechen im wesentlichen dem, 
was zum Aufbau eines FCB’s in früheren Kapiteln gesagt wurde. 
Lediglich Byte ®0 macht hier eine Ausnahne - nicht die Lauf- 
werkenummer ist hier eingetragen, sondern .... (siehe oben). 


Die Sache mit dem Eintragen der Laufwerksnummer in dieses Byte 
innerhalb eines FC#'s wird sowieso etwas unüblich gehandhabt, mal 
bedeutet 00 das gerade 'eingeloggte’ Laufwerk und mal Lauf-werk 
'A', aber wie bei allem was mit Software zu tun hat, man soll so 
etwas nicht zu 'verkniffen' sehen, wichtig ist haupt-sächlich, 
daß man weiß, was innerhalb eines Programnes gerade gemeint ist. 


Die zweite Zeile des FCB’s (Bytes 10..1F) kann nun schon einige 
Rätsel aufgeben, wenn man nicht weiß, wo es dabei 'lang' geht. Es 
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ist eigentlich ganz einfach, jeweils zwei Bytes bezeichnen eine 


fortlaufende Blocknummer, in welcher ein Datenblock zu finden 
ist. 


Doch nun eine etwas genauere Analyse: 


Zuerst, was ist ein Datenblock: darunter ist eine im DPB für 
jedes (logische) Laufwerk festgelegte Datengröße zu verstehen. 


Der Wert 1äßt sich aus BSH oder BLM erkennen. (siehe Teil IWV 
Kapitel 9 DISKIO). 


Im gezeigten Beispiel ist eine Blockgröße von 2048 Bytes (2K) 
vorgegeben (das muß man wissen - kann aber leicht mit SHOW in 
Erfahrung gebracht werden). 


Nun muß man nur noch wissen, daß der erste Datenblock (0000) 
immer mit dem ersten Sektor des Inhaltsverzeichnis beginnt. Das 
Inhaltsverzeichnis seinerseits ist der erste Sektor auf dem 
ersten Track nach den sog. Systenspuren. 


Die Systemspuren ihrerseits sind im DPB wiederum als OFF ange- 
geben, als OFFset von Track ® (immer in ganzen Track - keines- 
falls in Sektoren). 


Mit diesem Wissen und der Kenntnis, daß CP/M NUR logische Sek- 
toren kennt (außer im BIOS) wird die Sache ganz einfach: 


Die Blocknummer gibt den Offset in Blöcken vom ersten 
Eintrag im Inhaltsverzeichnis an. Blöcke sind normalerweise 
1024, 2048 oder 4096 Bytes groß (bei Harddisks auch 8 bis 
16K). Die Blockgröße entspricht dem Faktor (BLM+1)X128 
Bytes. (BLM+1Xlogischer Sektorgröße). 


Bevor wir die Geheimnisse der Blocknummern nun ganz genau be- 
trachten, zuerst einmal die Angaben von SHOW zu dem Laufwerk aus 
welchem der Auszug des Inhaltsverzeichnisses stamnt: 


F:! Drive Characteristics 
31,924: 128 Byte Record Capacity 
19,244: Kilobyte Drive Capacity 

1,024: 32 Byte Directory Entries 

#: Checked Directory Entries 

123: Records / Directory Entry 
16: Records / Block 

256: Sectors / Track 
A: Reserved Tracks 

256: Bytes / Physical Record 


Die Angabe 19,249 Kilobyte Drive Capacity (Laufwerkskapazität) 
läßt leicht darauf schließen, daß es sich hier um eine Harddisk 


handelt, Floppys haben (leider noch) keine solchen Speicherkapa- 
zitäten. 


Es ist aus den Daten ebenfalls zu entnehmen, daß die Blockgröße 
(16 Records/Block=161128Bytes=) 2048 Bytes beträgt (wobei jeder 
physikalische Sektor 256 Bytes=2 logische Sektoren groß ist). 


Die letzte wichtige Eintragung ist, daß ® reservierte Tracks 


vorhanden sind, das Inhaltsverzeichnis beginnt also in Sektor 1 
Track ®. 
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Betrachten wir nun die erste Blocknumner im obigen Beispiel 
finden wir dort die Zahl 1000. Nun computertypisch für 8080 und 
280-CPU's sind diese Angaben (in HEXadezimal) im Format -unterer 
Wert (LOW Byte) -oberer Wert (HIGH Byte), also mit der Bedeutung 
O100=01H, 1000=10H, ®OO1=-®100H und ®®10=1000H. 


Dies ist sicher etwas gewöhnungsbedürftig hängt aber damit zusanm- 
men, daß in diesem Format Doppelregisterinhalte abgelegt und 
zurückgelesen werden. 


Fangen wir nun einmal an zu rechnen: 10H=16 dezimal. 16Xblock- 
Größe=(1612048)=32768=32K. Nun betrachten wir einmal die mit SHOW 
festgestellte Anzahl der DIR-Einträge (1,024 32 Bytes Directory 
Entries). Wir stellen fest, daß die angegeben Blocknummer genau 
auf den ersten Block hinter dem Inhaltsverzeichnis zeigt. 


Um den ersten Sektor zu finden, in welchem sich die Datei STAT- 
LINE.INC befindet, sind nun nur noch wenige Berechnungen not- 
wendig. (CP/M kann das übrigens viel schneller als wir nit dem 
Taschenrechner oder gar aus dem Kopf). 


Rechnen wir erst einmal um, wieviele logische Sektoren 32768 
Bytes sind, es sind genau (32768/128=) 256 logische (128 Byte) 
Sektoren, soviel logische Sektoren wie genau auf einen Track 
passen. Die gesuchte Datei beginnt also in Sektor 1 Track 1. 


Um den ersten Block zu lesen, müssen wir (2048/128=)16 logische 
Sektoren lesen. Damit ist die Datei aber noch nicht völlig ge- 
lesen; es stehen noch mehr Angaben im FCB, nämlich die Nummer des 
zweiten Blockes. Er läßt sich genauso berechnen wie oben gezeigt. 


Da es gerade der nächste Block ist, kann man sich die Angelegen- 
heit natürlich erleichtern, er beginnt mit Sektor 17 (1+16). 


Fassen wir dies alles noch einmal zusammen: 


Eine Datei beginnt dort, wohin die erste Blockadresse 
zeigt. 


Die Dateigröße läßt sich aus dem EX-Feld und dem RC-Feld 
erkennen. Ist das EX-Feld nicht ®® sind noch weitere FCB’s 
zu der entsprechenden Datei vorhanden. Das RC-Feld gibt in 
jedem Falle an, aus wievielen logischen Sektoren die Datei 
besteht. 

Aus der Blockadresse ist der logische Sektor und der Track 
zu errechnen. Die Berechnungsgrundlage hierfür lautet: 
Gesantsektoren=(BlocknummerX(BLM+1) 
Track=(Gesamtsektoren/SPT)+OFF (Rest entfällt) siehe DPH 


Logischer Sektor=Gesantsektoren-Track(ohne Rest)ISPT 
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Beispiel: 


Berechnen des ersten (logischen) Sektors der Datei 
V9366.REL im gezeigten Inhaltsverzeichnis: 


Gesamtsektoren=21 (15H) 116=336 
Track=(336/256)+0=1,.. 
Logischer Sektor=336-(11256)=80 


Der physikalische Sektor in welchem sich der logische Sektor be- 
findet, ist (ebenfalls mit Daten aus dem DPB) zu berechnen mit 


Physikalischer Sektor=(Log.Sektor/(PHM+1)) 


Ein eventueller Rest deutet an, daß es sich um einen logischen 
Sektor handelt, der 'innerhalb’ des gefunden physikalischen Sek- 
tors liegt. (In einem 256 Byte Sektor sind ja zwei logische 
Sektoren enthalten. 


Der gefundene Wert geht davon aus, daß ein Track nit Sektor ® 
beginnt, dies ist unter CP/M 3 zwar möglich, es hat sich aber 
bereits unter CP/M 2 eingebürgert einen Track mit Sektor 1 zu 
beginnen und nicht wie bei der Track-Nummerierung mit ®. Dem 
gefunden Wert ist also eine 1 zuzufügen. 


Demnach startet die Datei V9366.REL auf Track 1 und dem phys- 
ikalischen Sektor 41. 


Hier kann noch eine weitere Falle eingebaut sein, nämlich der 
SKEW-Faktor. 


Ist dies der Fall, hilft es nur noch (über die BDOS-Funktion 50) 
die B1OS-Funktion SECTRN aufzurufen. (Siehe Teil IV Kapitel 9 
DISKIO). 


Anmerkung: 


Die meisten Disketten-Inspektionsprogramme 'arbeiten’ mit der 
Angabe der logischen Sektornummer, soll aber auf einen bestimmten 
Sektor über das BIlOS zugegriffen werden, so ist immer mit dem 
physikalischen Sektor zu rechnen. 


Bei zweiseitigen Disketten kann darüber hinaus die Angabe des 
OFFset (oder anders ausgedrückt die Anzahl der reservierten 
Systemspuren) etwas irreführend sein. Dies ist der Fall, wenn, 
wie in der vorliegenden BIOS-Beschreibung, die Seitenumschaltung 
aus der Tracknummer abgeleitet wird; in diesem Fall wird eine 
Diskette logisch so aufgeteilt, als hätte sie die doppelte Anzahl 
von Tracks, nämlich z.B. 8® Track auf Seite ® und 8® Tracks auf 
Seite 1, dafür aber auch nur soviel Tracks wie wirklich pro Seite 
vorhanden sind. 


Es kann hier natürlich auch mit einem Offset von einer Systemspur 
'gearbeitet’ werden, in den meisten Fällen wird dies jedoch 
vermieden, um damit zu gewährleisten, daß das Inhaltsverzeichnis 
immer auf Seite ® einer Diskette beginnt. 
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Ein weiteres Beispiel soll noch die 'Eigenarten' des erweiterten 
Inhaltsverzeichnisses verdeutlichen, wie es mit INITDIR generiert 
werden kann: 


DA 4153 5445 520 zum Dust lem nam MASTER un 
19 ar a 13 8 
53 A342 ZN MM 52 ASAC Wem es SCH REL 
Zt Aid Mad nd ur and Gar a iz 

an: mdd 4953 449 Arm 32 SA hm nl? Giörid el 
SW. 0.02 0302 Mod nad nnd Na Ka 
ea Zi la ZI ET 1 7 el ZEIT rar 
7a GES ZU TR MBl2 a7 MEZ An [Fu | 





Auf den ersten Blick sind die DIR-Einträge kaum vom voran ge- 
gangenen Beispiel zu unterscheiden. Erst beim zweiten Blick 
findet man gewisse Unterschiede: 


Der erste Eintrag beginnt mit 20, hier handelt es sich also um 
einen LABEL-Eintrag, d.h. um den Namen der Diskette. 


Das EX-Feld wird hier zu anderen Dingen 'mißbraucht'. Hier hat 
jedes gesetzte (=1) Bit eine besondere Bedeutung: 


Bit 7 Die Diskette ist Paßwortgeschützt 


Bit 6 Zeit- und Datumsmarken setzen beim 
Dateizugriff (access) 


Bit 5 Zeit- und Datumsmarken setzen bei 
Dateierneuerung (update) 


Bit 4 Zeit- und Datumsmarken setzen bei 
Neueröffnung einer Datei (create) 


Bit 3 Ein Diskettenname (Label) wurde zugewiesen. 


Byte 10..17 hier steht (in verschlüsselter Form) das Paßwort, 
das der Diskette zugewiesen wurde. 


Byte 18..19 Hier steht das Datum, an welchem der Disketten- 
name zugewiesen wurde (create). 


Byte 1A..1B Hier steht die dazugehörende Uhrzeit (in BCD) 


Byte 1C..1D Hier steht das Datum an welchem der Disketten- 
name zuletzt geändert wurde 


Byte 1E,..1F Hier steht die dazugehörende Uhrzeit (in BCD) 
Das Datum ist immer als Offset (in HEX) vom 
1.1.1978 eingegeben. Die Uhrzeit nur mit Stunden 
(erstes Byte) und Minuten (zweites Byte). 


Ab der relativen Adresse 60 beginnt das zusätzliche Datenfeld 
für die drei vorangegangenen Dateien. 


Dieses Datenfeld ist wie folgt aufgebaut: 
Byte 00 21 = Kenner 


16® 


Byte 


Byte 


Byte 
Byte 
Byte 


Byte 
Byte 
Byte 
Byte 
Byte 
Byte 
Byte 
Byte 


Aus 


0. 


05. 


09 
OA 


OB. 


OF. 


13 
14 


15. 
19. 


1D 
1E 
1F 


diesen Angaben kann recht einfach erkannt werden, daß z.B. 


.04 


.08 


. dE 


.12 


.18 
.1C 


Datums- und Zeitmarke (create oder access) für 
die erste Datei im Feld. 


Datums- und Zeitmarke (update) für die erste 
Datei im Feld. 


Paßwortmodus (siehe BDOS-Funktion 192) 
reserviert vom Betriebssysten. 


Datums- und Zeitmarken (create oder access) für 
die zweite Datei im Feld 


Marken für update der zweiten Datei 
Paßwortmodus der zweiten Datei 

reserviert für die zweite Datei 

Marken (create oder access) der dritten Datei 
Marken (update) der dritten Datei 
Paßwortmodus der dritten Datei 

reserviert für die dritte Datei 


frei (?) 


die Datei SCB.REL um 15.23 Uhr 'tätig' war. 


Das Datum ist nicht so ohne weiteres feststellbar, 
®B15H (=2837) Tage seit dem 1.1.1978 vergangen, 


also etwa Juli/ August 1985). 


Es gibt zur Berechnung des genauen Datuns und des Wochentages 


bestimmte 
Buches sprengen würden. 


Algorithmen deren Erläuterung jedoch den Rahmen dieses 
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es sind halt 
(grob 7,77 Jahre 
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Kapitel 2 ..,. nun noch das Besondere - Interrupte und RAXN-Floppy 


In den vorangegangenen Kapitels wurden (fast) alle Details des 
BDOS und des BIOS erwähnt, aber ganz sicher ist dem Systenpro- 
grammierer mit den hier gegebenen Unterlagen immer noch nicht 
gedient. Leute dieser Art - und ich zähle mich selbst dazu - sind 
mit allen Unterlagen die sie bekommen können, unzufrieden es 
könnte doch irgendwo noch ein kleines Geheimnis stecken, das 
ausgenutzt werden kann ... 


Sicher würde hier das Listing des CCP und des BDOS ein ganzes 
Stück weiter helfen, aber diese sind eben nicht lieferbar, wenn 
es auch bereits eine ganze Reihe von Quellen für disassenblierte 
und nachkommentierte Listings gibt. Inwieweit jedoch derartige 
'Unterlagen'’ von Wert sind hängt sicher von der Qualität der 
'übersetzung’ ab und vom jeweiligen 'Verwendungszweck’. 


Totzdem gibt es einige Besonderheiten, die nirgends in den 
Originalunterlagen besprochen werden, dem Betroffenen aber das 
Leben doch recht schwer machen können. 


Eines dieser Dinge ist die Anwendung von Interrupts unter CP/M3. 


Der Interrupt 'lebt’ davon, daß bei seinem Auftreten ein be- 
stimmter Vektor auf die sog. Interrupt-Service-Routine zur Ver- 
fügung steht. So weit so gut, aber 8-Bit Prozessoren können im 
allgemeinen nur einen Speicherbereich von 64k adressieren, aus 
diesem Grunde wurde für CP/M 3 ja auch das Banking eingeführt, um 
mehr Speicherplatz adressieren zu können. Wenn nun ein Interrupt 
auftritt, steht der CPU zwar die Adresse der Service-Routine zur 
Verfügung aber ob diese Routine auch gerade in der Bank steht die 
gerade eingeschaltet ist? 


Hier bieten sich mehrere Lösungen an: 
2 Im Interrupt Modus ® (8080 Mode) 


Hier kann die unterste Seite ( Adresse ®..FFH) in Bank ® 
und allen Banken oberhalb Bank 1 reserviert werden (geht 
mit GENCPM). Die Sprungvektoren müssen dann aber auf allen 


(möglichen) Banken eingetragen werden. (Natürlich auch auf 
Bank 1 !). 


Zeigen müssen die Vektoren jedoch in jedem Falle in den 


gemeinsamen Speicherbereich, denn nur dieser ist aus allen 
Banken erreichbar. 


2: Im Interrupt Modus 1 (RST 38) 


Hier gilt das unter (1) gesagte. In Bank 1, der TPA-Bank 
sind jedoch besondere Vorkehrungen zu treffen, da die Adres- 


se 00®38H auch von SID & Co verwendet wird, dies galt aber 
auch schon für CP/M 2. 


3. Im Interrupt Modus 2 (Vector Interrupt) 
Dieser Modus ist natürlich nur mit Z8®-Prozessoren und 


entsprechender Periferie möglich. Es ist jedoch die ein- 
fachste Lösung für viele Probleme. 
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Das nachfolgende Listing zeigt die Anwendung eines Z80-CTC’s als 
Interrupt-Geber für eine software-Uhr unter CP/M 3. Die Initia- 
lisierung erfolgt mit Aufruf des DATE-Befehles. 








ZEANSM SuperFast Relaratıng Macro Assentier ee a eg 

STim: 280 25 Jan 86 11:53 IIHE.IX]| 
I MCLIE DEFAULT. INC 
2 ; AQRBRSRHIGRISEFERRISERRKILBRIHASSH LEI ERITIHRSIIEN BAUR 
3 ‚it \ x 
4 3 MOL TIMESOrT. inc x 
5 sk ReL 2.0 SSm2S ı 
[3 2 x 
7 x Dieses Programmsegsent unterstuetzt eine sortwareminr mit & 
3 ; X gem Zilog-Baustein (IC. X 
g “: 1 
19 ‘ * Die software-Uhr iaeuft ıR Sekunden-interrupt und ıst voll & 
R] > CP/M3 kompatibel ( d.H. are Zeit wird aut DATE gestellt - 8 
12 ‘ % laeuft aber erst NACH oem Stellen an - umd kann mit OATE x 
13 ; X ooar einen entsprechenden BixS-Call geiesen wergen x 
14 3 x 
15 X kırd die Zeit in der Statuszeile benutzt werden keine k 
I6 ; % Sekunden angezeigt t 
ir v2 i 
13 ‘ * geschrieben van RAÖUL 0. KÜERBER, Detaod x 
19 AR: fuer ELZET-& Mikrocmouter üran & CO k5 t 
R) wi x 
2 s HRAKEKKREKLSSHhRRSRKRKERKKIKERRLHRKFRFRRRKIKRRRSKRRKR RR RRRRA ARE 
2 | 
2 Diese Dateı muss ın gie lateı EXT eıngebungen wargen 
25 : (mıt eınem INCLUGE-Befeni) 
2 ‘ Die nachfeigend genannten externen Varıablen sınd qann 
27 ı zu entfernen - sie aıenen lediglich aazu diese Dateı 
2 ; als Muster zu assentlieren. 
23 ; 
= 
3 extrn nate,tsec ; ım SCH 
32 
33 cseg 
34 
KU} i 
% ; KERRERRAREKRERKR 
37 ; % Zeıt/batum & 
3 ‚ krktkerkkkekinke 
3 ; 
4 
al ?time: 
[yi 
43 ; 
4 ; Aufruf von ?TIME erfoigt »ıt ÄC=FF wenn Jıe Zeıt 
4 ; gestellt werden soll. die eınzustellenge Zeit uebergidt 
46 + CP/M3 ım SCB ( siene oort ) 
47 ; Bei <C)=# soll are Zeit ım SCH aut den neuesten Stand 
43 ; gebracht werden. Ga dıe CIC-Uhr im Interrupt betrieben 
43 ; wird, ist diese Funktion ueberfluessig - eine Auffrischung 
5o ; erfolgt im Sekungentakt 
Ey] i 
52 
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23 
ss 


SRERRTETISSURHER 


69 

I) 

7 

7 

73 0002" F3 

74 0003’ E5 

75 0004’ 05 

76 005’ 3E FF 
77 @607' ED 47 
73 0099’ ED SE 
79 OR" 21 AR’ 
30 ODE’ 22 FFO2 
81 al’ 21 AazR’ 
92 14’ CO MB’ 
8 17 D1 

3 ala’ EI 


94 

% 

% 

- 7 IB’ 46 
3 Mc’ 04 
9 10’ 85 
100 IE’ C8 
1e1 @elF' 25 
102 0020' 4E 
163 0821° 23 
194 0022’ 7E 
185 0023' ED 79 
106 0925’ 18 F8 
187 027° c9 
198 

169 


ine c 
ret nz 


tıkktakrkkiztikk 
* Einstellen & 
KIERKEKKRRRKERKE 


Inıtialisieren? 
... fertig wenn nicht 


dıe Zeit hat CP/M bereits im SCB abgelagt 


; beim Zeitsetzen wirg leaıglich ser (TC inıtıalisiert 


settine: 


; inıtialisieren des CIC 


sena$init: 


; keıne Unterbrechung 
hl 
oe 
a,hıah ıvect# 
1,a 
2 
hl,cteserv 
(ivectl),hl 
hl,cikinıt 
send$init 
de 
hl 


; Vektor 


; Ausgabe eines Initialisierungs-Strings. 
; 1. Zeichen im String ist dıe Anzahl der zu sendenden 
; Zweiergruppen. Jede Zweiergruppe besteht aus 


; 1. Einer Portadresse 2. Des Inıtialisierungswertes o 
ld b,(hl) ; Laenge des INITstrings(/2) 
inc b 
dec b ; evtl @ = keine Inıt notwendig ? 
ret z 
sndinil:inc hl ; naechster wert 
ld c,(hl) ; Initport 
inc hl ; naechster kert 
ld a,(hl) ; Inıtwert 
out (c),a ; Wert senden 
djinz sndınil ; fertig? 
ret 
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110 0a28° 07 cikinit! 
111 029° 29 93 
112 92’ 21 93 
113 0620’ 20 00 
114 MRZr’ 28 35 
115 0031’ 20 70 
116 022° 21.05 
117 35’ 21 70 
118 

113 0937° 00 usrtlg: 
19 

121 

122 

123 

124 

125 

126 

127 

128 

129 

19 

13 

12 

133 

134 

135 

136 

137 

18 

139 

148 

141 

142 

143 0038’ F3 cteserv: 
144 0939’ F5 
145 @03A’ ES 
146 A038’ 21 Oma 
147 @@3E' TE 
148 O83F' C5 61 
143 0941’ 27 
150 9842’ 77 
151 0043’ FE 69 
152 0045' 3 24 
153 

154 A947’ 36 
155 049° 28 
156 Od’ TE 
157 0848’ C6 91 
158 Mau’ 27 
159 O84E’ 77 
169 @Q4F' FE 6A 
161 9051’ 3 15 
162 

163 0053’ 3% 09 
164 0955’ 28 
165 0056’ 7E 
166 0657' C6 #1 
167 0059° 27 
168 005A’ 77 
169 @05B’ FE 24 
170 0050’ 33 09 
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bı) 7 ı Stringlaenge/2 
db psctch,rescte 

& - psctel,resctc 

db p$ctch, low ivertä 

ab p$ctch,timer 

db psctch,timdd 

& p$ctel,cowmter 

ob psctcl,cntcon 

[2] 


a ; NZ nacn Interrupt. 
13559559935937791 


% INT-Service & 
1 3573595335977974 


Anmerkung betreffend Interrupts unter CP/M3: 


Es ist NK Mode 2 sıcher, da der Interrupt prinzipiell aut 

jeger Bank moeglich sein muss. Der Interrupt-Vektor ist ab 
Adresse ÖFFIBH einzutragen (HFäH.. .ÖFFORH ist, fuer Systen- 
software - z.B. are UHR ) freizuhalten. Die Interuptservice- 
Routine muss innerhalo des gemeinsamen (common) Bereiches liegen 
Sıe kann entweder unter (S£G in das BIOS eingebunden werden oder 
(falls kurz genug) innerhaib dem Vektor-Eareich von BFFIAK ... 
OFF7FH liegen. (ger Bereich dahinter ist wegen u.U. schlechter 
Stackmodalitaeten einiger Programme nicht sicher !) 

Bitte Beachten: das LOW-Byte nes Interruptvektors muss immer auf 
einer geraden Speicheradresse liegen .... 


dı 

push af 

push hl 

ld hl,&sec 

ld a,(hl) ; lese Sekunden 
add a,l 

daa 

ld {hl),a ; Sekunden + 1 
cp cah ; ganze Minute ? 
jr c,exit] ; nein 

ld (hl),8 ı reset Sekunden 
dec hl ; => Nınuten 
ld a,(hl) ; und lesen 
add a,l 

daa 

ld (hl),a ; Minuten + ] 

cp c#h ; ganze Stunde ? 
Ir c,exit ; wenn nein 

ld (hl),8 ; reset, Minuten 
dec hl ; => Stunden 
ld a,(hl) ; und lesen 

add a,l 

daa 

ld (hl),a ; Stunden + 1 

cp 24h ganzer Tag ? 
jr c,&xit ; nein 





Im 

172 Wu’ 36 00 
173 0061’ 2A One 
174 Wed’ 23 

175 n65' 22 Ali 
176 @023' 32 0937’ 
177 Ban! E 

178 B06C’ Fl 

179 BneD’ FB 

129 Guck’ EU du 
121 


# Erroris) Detected. 112 Program Bytes 


199 Symboıs Detected 


8. TIME A 


Bu 


exit: 
exıtl! 


ei 
retı 


(nl),# 

nl, (date) 
hl 
(Mnate).hi 
(usrtlg),a 
hi 

at 


; reset, Stuncen 


Tage + | 


; freigeben zur Ausgane 
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Eine weitere Besonderheit unter CP/M 3 ist es, daß eine RAM- 
Floppy sehr einfach angepaßt werden kann. 


Auch hierzu sei das nachfolgende Listing ein Beispiel. 


Zu berücksichtigen bei der Anpassung ist immer die Größe des 
gemeinsamen (common) Speicherbereiches, die RAM-Floppy darf nie- 
mals in diesen Bereich überlaufen. Im übrigen wird auch für eine 
RAM-Floppy ein DPH und ein DPB benötigt ... 


"RAM-FLOPPY mit. NOR-Klein-Computer’ 
RDISK INC 3 Dec 85 99:38 

361 SKKRRRRRRÄSRFRRERHRRLTHRRRARRRRRRRRSRIIHHRRLSHRRRARRSSHERSERRARHE 
362 


>> 


AM-FLÖFFY fuer NÜR-Klein-Computer unter CP/M 3 


D 


„-.- 


x 
x 
X 
‚rel l.l Suse 
x 
x 
x 
k 


Er 
1} 
= 
1 
$ 
= 
= 
a 
» 
& 
£ 
& 
ax 
® 
© 
K4 
5 
. nn  » »- 


i 

ı hrtepnkbrephikhe 

; varıacie 

ı hattikrhpkcheitn 

" geı ser Fanrzuveisun tan, 2355 eın 
InDEST ung &5 bancetist 

{ opoy ıhF) zugewiasene Sankpersiche guerfen 

‘ yeger SENCFM nicht nacneinmai zugewiesen wergen 










ir Zinase 
ıf  askıt . . j 
accept 'Erste Bank (sczealicn ab Bank 2 ' firstänank 


30 FFFF 
Vu 24 FFEF 


35 nd 


else 
enaıf 
399 FFFF it askıt 


391 Quror ‚accept ‘Letzte Bank (moealicn bıs Bank 15) ',lastsbank 
else 
enaıf 
EMDIF 


DB2PPP>PPPPPPrPpr prppr>sppprpsprr>m 


397 DK, Artracks eu last$oank-tirstsoankt] 
38 9049 Mrs el 64 ı DIR-Eintrage 
399 VL.) Aseclen oetl 1924 ; Sektorgroesse 
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406 
Aal 

442 
403 
dad 
4uß 

[0/3 

4u7 

43 A 
Ag u Bi? 
ala DOM" 5175“ 
all ars2" anar® 
a2 RI 
413 ara 

ala BRI6” Ka 
Ab 
416 Al” FF 
AlT AZ" wie 
413 GBA4” FFFE 
419 mas” FFFE 
420 wahB" FFFE FFFE 
Az} BnAk” a 

42 

423 

424 

25 FFFF 
4% a) 
427 0] 
u 

429 ar ac 
A: 2 
4E) Ma2a' On 
A325 Ar 
433 MT Ou7r 
4340’ Ca 
435 bb’ a 
426 000" A 
427 Bmor' 3 97 
438 

439 

440 

441 

442 

443 

444 G0AF" 

445 

446 

447 

443 

449 

459 

45] 

452 BAAR? al and 
453 0082” CO Ok 
454 Gas“ 11 Arad 
455 MBg" 21 9119" 
456 AAtb” a1 0097 
457 QBBE” E5 

453 BBF" CD One 
459 @8C2” EI 

46a 3" 11 Org" 
461 ORC6” d6 97 


= 
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ee EEE NIER ORTE EOS 


>>> > m m mo mo mu co 


rt$ınıt! 


bedankt, 


keine Zuweisung 
keın Sxew 


Gemeinsamer Bereich 


se ’ 
; 

‚ AagskesstHH HH RRt 

; RF-ICPH 

‚ kadınktsttirttt 

7 ritwrıte 

M rt$read 

bi) rf$iogın 

[7 rtsinıt 

2b 8,6 ; 
den ,ropn ; 
2W % 

ch 2,0,0,0,0,0,0,0, 

b.:) 1 

[67 ropb 

dw 2 

2 2 

P,7 -2,-2,2 

c 

cseg ı 
tracks co 4 

gefl Ziurs 

gel Zus 

‚dpo 1924,56, rtracks,bıklen,aırs.% 
du ra 

2b a2, 

b.) mid 

bi" JE 

[7 remis 

3b 779617,7 7913 

[7 E) 

Jw a 

b.:) Pa, Paz] 

aseg i 


D 


gebankter Bereich 


; Zur Erkennung der RAMFLÜPPY wird eine Leerdatei RUISK in 
; are Directory eingeschrieben. Beı Inıt wırd ueberprueft 
; ob oıese Dateı angelegt ist. 


be, first$bank - 
Txmaverkt 

»,d H 
hl,rfsfcb] ; 
be,cap$len [ 


oe, rf$tcha 
b,cmpslen 


gart ıst are Directory 


elle I. Eintrag 
Ziel 
muesste reichen zum Vergleichen 


‚ Zeıger retten 

; und Transfer 

; Zeıger auf ’Inhalt’ der GIR 

ı Zeiger aut FCB wıe gewuenscht 
; soviel Zeichen zum Vergleich 


462 Ma" 1A 


Art$ınli Id 
A 


463 0009" BE cp 
464 BRCA" 20 05 A jr 
465 A6CC® 13 A ınc 
466 cl" 23 A inc 
467 GoCE" 19 FB A dinz 
Le A ret 
469 A 

a7 ul" al Mi Arfsın2: 1a 
Ari und" CD Boa A cail 
472 7 I A ld 
473 Ana" 21 Da A 13 
474 ol" Ol Az A ld 
475 BAER" CO OR A call 
A76 Wa? 06 7F A ld 
477 W0E5" C5 Arfsins: pusn 
478 ins" ol a A id 
473 MEI" CO Aa A call 
4a wec” 1 B120° A ld 
45) er" a A id 
482 QOr2" CD a A call 
433 Gur5" 1 A pop 
424 inr6" 18 ED A dinz 
435 Mary“ c9 A ret 
4% A 

487 3" 20 52 41 AArfstchA:ch 
a at a ob 
459 A 

4m Arfafcblias 
49] A 

432 a7 Acmorlen aı 
433 1m? Art$tch2:rept 
494 419" 

445 Alm" 

4% Hin" ES 

497 al2l" ES 

48 022° E5 

439 0123" ES 

Son 6124” ES 


Sal a125° ES 
502 #126" E5 
sag 0127" E5 
544 #123" E5 
ses 029° E5 
So al2A” E5 
Sa7 alze" ES 
543 6120” 65 
529 4120" E5 
51a Hl2E” ES 
sıl @l2F* ES 
512 6139” E5 
S13 al2]* ES 
Si4 #132” E5 
515 A233" ES 
Siß #134” E5 
S17 135° E5 
513 #136” E5 
519 #137" E5 
529 0139” &5 
521 0139° ES 
522 9134” &5 


© 00 0 170 00 70 DO LU O0 DO CD 7 DO TO CO nO CCı RO 00 DO a m DD m > 
3333335333338 SRERBARNEEEEDN 8 


a,(de) 
(hl) 

nz, rt$ın2 
ne 

hl 

rf»in] 


be,fırstsoank sn] $ +0 
Trmovert 

ae, rfstcon 

ni,d 

be,22 

Tmavekt 

b,aırs-] 

bc 

be,firstsoank shi 3 + 
Trmaveiik 

de, rfstch? 

bc,32 


. 


; Zeichen aus FÜ 
‚ ateıch FCBI? 
1... Wenn nIcht ... 


; bıs alles klar 


; arıgınal Fibnwelle 


; Ziel 
; Laenge 
; und Transfer 


; soviel Din sınd leer 


; rette GIR-Zashier 


ı IMOVE ınıt 

; Dummy-FC& 

ı Laenge ass Üummy 
; Transter 

; DIR-Zaenler 


Zum, RamL IE ', Dun, Zum, Zum, 
,9.0.6,0.9,6.0.0,8.6,0,0.0,4,8 


7 


$-riyichi 
32 
MESH 


... kein INZT notwengis 
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TRAck=Zreinank 
+uffset berechnen 
--> Zıel 

ie} iDank 

--; ualle 

KMVE ıinıtialisieren 
berechne Rät-Adresse 


Track =tuel inank 


Zeipank 


Sektor Nummer 
Berechnen RAM-Start 


2 

14 = Sektorantangsadresse 
OMA-Adresse 

Sektorgroesse 


523 013" ES B cd WEEH 

524 61° ES B bı) m5H 

525 010° ES B De 2:12) 

56 3” ES B db GESH 

527 ar5F" ES [3 ab BESH 

53 A 

529 win“ Arfswrite: 

5% A 

S21 alda* 3a ame A ld a, (dtrk) 

532 0143" (5 94 A a0 a,firstsoank 

533 al45" 47 [) ld h,a 

534 Hl6” Ar A ig a, (duonk } 

535 A149" Ar A lg 1,2 

53 Wlaa" CD ie A call  ?xmovers 

537 214° CD E17" A call  recale 

Sie A p Tmavarı 

59 A 

546 #153" Arf$read: 

5 A 

542 A A ls a,(dtrk) 

543 W156” (6 04 A am a.fırstäoank 

544 a" 4 A la c,a 

545 0159° ZA Gi A id a. (dyonk ) 

S4ö alsc" 47 A id b,a 

547 Wi50” CD Ark A call  ?xmaveit 

Sag Alan" CD el67" A call reale 

549 al63" EB [ ex oe.hl 

55a alEd’ 3 a A ‚pP move 

551 A 

552 2167" Arscalc! 

553 A 

554 A 5 

555 A ı Berechnen ger (uell- ozw Zieiparamerer 

SE A ; zurueck st! 

557 A ‚ Mm) Zeiger auf RF-SEKTÜR-Anfang 
5 A ; <DE> Zeiger aut Df-Aurasse 

553 A H 

SCH A 

SE MET" SA Oi A la a, (#sect) 

562 HlkA” 67 A 14 n,a 

563 H16B“ ZE A id 1,8 

564 HiED” 29 A an hl.nl 

565 HlkE? 29 A a0d hl,hl 

566 BIEF" ED 58 Bi Ib) 2e, !Acma) 

567 A173" Ol dm A ld be,seclen 

563 A 

569 9176” Art$logın: 

578 A 

sm a76" c9 A ret 


Kapitel 3 Ausblicke oder was kommt danach .,. 


Sicherlich 14ßt CP/M 3 dem geübten Benutzer gegenüber noch einige 
Wünsche und Fragen offen. Aber gegenüber vielen anderen Betriebs- 
systemen hat es halt immer noch den Vorteil ausgereift und damit 
(relativ) fehlerfrei zu sein. Es besticht durch seine doch recht 
einfache Anwendung und die Tatsache, daß es CP/M auch für andere 
Prozessoren als den 8080 bzw. Z8® gibt. (CPM86 und CPM68). 


Venn ein vom Prozessor her nicht kompatibler Computer mit einer 
derart großen Verteilung (in Stückzahlen incl. Nachbauten) wie 
der APPLE (R) von sich behauptet der verbreitetste CP/M-Computer 
(wohlgemerkt mit einer Z80-Zusatzkarte) zu sein, so spricht diese 
Tatsache doch für sich, für 8-Bit Computer gibt es nichts Bes- 


seres, zumindest nichts zu diesem Preis und mit dieser Ver- 
breitung. 


Es ist auch immer wieder verwunderlich, daß 16-Bit-Computer wie 
der IBN-PC «R) und der ATARI ST (R) verblüffend schnell CP/M- 
Emulationsprogramme zur 'Verfügung' haben. 


Was die Wünsche angeht, so bietet CP/M mit der Möglichkeit des 
Einsatzes von RSX-Modulen sicherlich ein recht brauchbares In- 


strument um (fast) alles zu erzwingen, was dem Einzelnen fehlen 
mag. 


Vielleicht am 'schwächsten’ ist der CCP, hier würden gar Viele es 
gerne sehen, wenn er noch mehr könnte, aber auch hier bleibt die 
Frage offen, wer hätte davon den Nutzen? Der normale Benutzer 
würde sicher durch mehr Möglichkeiten auch mehr verwirrt werden 
und ist es nicht die vornehnmste Ausgabe eines Betriebssysteme 
Programme einwandfrei ablaufen zu lassen die für das Betriebs- 
system geschrieben wurden, anstelle mit noch mehr Optionen (in 
der CCP-Befehlszeile) irgendwelche Daten nit irgendwelchen Zu- 
satzfunktionen durch irgendwelche Zusatzkanäle zu schleusen? 


Ganz sicher stellt sich CP/M 3 als ein recht zuverlässiges System 
dar, mit dem der Anfänger mit wenig Einarbeitung und der Profi 


ohne Plage gut zurecht kommt - und als mehr hat sich CP/M auch 
nie dargestellt. 


Wer bereits mit einem CP/M3-System gearbeitet hat, daß auf eine 
RAN/ROM-Floppy bootet und Disketten nur noch als Langzeitspeicher 
benutzt, der kann sich sicherlich nur sehr schwer an die 
langsamen Bearbeitungszeiten mancher 16-Bit-Rechner gewöhnen. 
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Teil VI Nützliches 
Die ELMON-Anpassung MONIO 179 


».. Formatieren zum Beispiel 201 


177 


Kapitel 1 Die BLNON-Anpassung KONIO 


Es ist im Prinzip einerlei wie der Ein- Ausgabeteil eines Moni- 
torprogrammes aufgebaut ist. Da alle bisherigen Programnsegmente 
auf den KNDR-Klein-Computer zugeschnitten wurden, so soll das 
entsprechende Listing des CP/M-3 hardware-Teibers aus dem Mo- 
nitor-Programm ELMON ergänzend abgedruckt werden. 


Ähnlich wie beim BbOS ist hier ebenfalls eine Sprungleiste zu 
erkennen, über welche alle infrage kommenden Unterprogramme auf- 
gerufen werden können. Auch die Aufruf-Konventionen wurden weit- 
gehend beibehalten. 


Sprungleisten haben sich für derartige Anwendungen besonders gut 
bewährt, da die Bezugsadresse für den Aufruf immer gleich bleibt, 
die Unterprogramme sich jedoch mit jeder Revision, die vorgenon- 


men wird, ändern können, ohne daß irgendwelche Anpassungen vorge- 
nommen werden müssen. 


Das nachfolgende Programmsegment ist die (adressenmäßig festge- 
legte) Hardware-Anpassung für den CP/M 3 Bootmonitor ELMON aus 
dem ELEKTRONIKLADEN, Detmold, einem der authorisierten Händler 
des NDR-Klein-Computers. 
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ZEHASM SuperFast Relocatıng Macro Assentler 2) Dec 85 i9:&3 ZBunsm 1.24 Fage 1 
MONIO 230 3 Dac 85 19:02 


INCLUGE MONEQU.LIE 


! 

2 A ‚list 

3 

4 } ARBRKRLESHSSKRRKRRRRRERRRKKERRRRFSIERFIKKÄRKRERTRLHETSRERRRIKRSR 

5 ı X naraware-Ein/Ausaane Modul fuer NR-Projert t 

5 ; AskRÄRSEStESSRSEHERSKERRARRFEIKRRKRKHRKHRR FERTIG RAS RER FA KR SF FR 

s Ä 

9 ; Dies ıst eın "eıgenstaengiser' Ein/Ausgabetreicer 

ia ! inel oer zugenverigen imitialisierung 

Bj ; hırd ELMN als "Aufsatz’ zu FLÜMöN betrieben, wergen 

12 ; Inıtiaiısierung und 1/0 sweit mealıch von nort 

13 ; Dieser Treiberteil resimert ab Adresse [ists 

14 ‚ und wırd von CP/M3 (in wer ELEKTRÜNIKLADEN-Version: benutzt, 
5 © 
16 

17 FCaM org Arch ; Start Mihid 

13 

19 n 

M ı RUKKSERKRRKKERRR 
2] ; & Einspruenge & 

2 ; RARKRRRSKKKERRRE 
23 I 

24 
25 r 

Pu ; Einıge EIN/AUS-Sabe Routinen wergen der Kanpatıbilitaet haider 
2 ; auf aehniıche Art wıe beı FLÖMÖN aus nem Rüff-Bereich des FLÜMÖN 
22 ; 'aeholt’ - Bei spaeteren Aenderungen koennen are Einsprimgadresse 
3 ; u.U. verschoben wergen - lteber nıe Funktion der angesprungenen 
30 ; Unterprogranme kann hıer keine Aussage gemacht werden ..... 

Ei] \ 
32 
33 BODE fci em eudeh ; 1m FLÜMON CONIN 

34 9321 fco eu 932in » ım FLOMON COMOUT 
35 RED fetst equ euch ; 1m FLÖMON CONIST 
3% HRS frı eu H205h » im FLOMON 
37 A2ak fpo eu a2deh ; im FLÖMON 

3 9218 flo eu #21 ; Im FLOMON 
46 
4] B 

42 sk (P/M kompatiole Ein/Ausgaberoutinen FtrX @) 
43 ; Eingabe in «Akku Ausgabe ueber <C> ( Zeichen zurueck in <A> 
pr ; Status #u=es liegt nichts vor - FF= Zeichen lieat an 
45 ; 

46 ; Die Reinenfolge ger Sprungtabelle darf keinesfalis 
47 ; veraendert werden, da alle anderen Programmtsıle fuer 
43 ; 1/0 nur darauf zugreifen. 

43 ; 
5 

SI FCaa C3 FCHF conıst! Ip .conist konsolenstatus (Ein) 
52 FCa3 C3 FCAE conın! jp .conin Konsoleneingabe 

53 FC6 03 FESb conaut: jp .comut Konsolenausgabe 


SAFCd BF list: jp list ; Druckerausgabe (CENT) 
55 FCOC 3 FB)  auout: jp  aueut ; Aux Ausgabe 


56 FCOF C3 FCTF awin: jp .auxin Aux Eingabe 
57 FCI2 C3 FC77 auxist! jp ‚auxist ; Aux(eingabe)Status 
58 FCIS 3 FC Istst! jp ‚Istst ; Oruckerstatus (SER) 
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a SuperFast Relocating Macro Assembler 23 Dec 85 10:03 ZEHASM 1.24 Fage 2 
MONIO 288 


59 FCIB 63 FC74 comst: jp .conost, ; Konsolenstatus (AUS) 

6a FCIB C3 FCA6 casist! jp „easıst ; Kassettenleingabe)Status 
SI FEIE 13 FCAB casin: jp .casın ; Kassetteneingane 
k2FC2I CI FCBI  casout: jp .casaut ; Kassettenausaabe 

63 FC24 03 FCEU setbnk: jp „setonk ; Bank setzen 

64 FC27 C3 FCOC floppri jp „Floppy ; Cısk-Treiner 

&5 

66 i 

67 ; Reserviert fuer spaetere Erweiterungen 

6 i 

69 

70 FCZA 03 onen jp $-$ 

TI FC (3 Goa jp $-$ 

72 FC28 C3 FC03 init: jp ‚Int 

73 

74 H 

75 ; Flags und Zeiger 
76 i 

7 

78 FC3 
79 FC34 
80 FC35 
81 FCH 
22 

83 FC37 
34 FOR 
85 FC39 
36 FCHA 
87 FB 
BFCK 
SI FCH 
MFC 
El) 

a2 H 

93 5 KRRSERRRKRRRRRRRRRRRERKRR ER RR RK 
44 ı * Ein/Ausgabe Routinen x 
Er} 333557577 57577777 7737773709 47477 
% . 

97 
8 
” i 
106 ‚ srkkirakkakehkrk 
10) ; *% Konsalstatus X 
192 m 37773799597707 94 
103 ‘ 

184 

185 FCSF .conıst: 

106 


iobyte! 
curbnk: 
&dhnk ! 
&chnk! 


; z.2. nıcht, implementiert 
; qeltige Bank 


DS u 


flge: 
flgl: 
flg2: 
flg3: 
flg4: 
fig: 
flg6: 
flg7: 


; Reserve 


SIEEETFTEL BEE 
33333333 3333 


So Tro .m 


168 ‚ diese Routine bringt FF zurueck wenn eın Zeichen Eingabebereit 
199 ; ist, andernfalls komat 4% zurueck 

in ‚ Abgefragt wırd KEY 

u ’ 


113 FC3F ED 73 FETE ld (spsav),sp ; zuerst Stack nach 'oben’ 
114 FC43 31 FECA ld sp,tstack 

115 FC46 CD FCC2 call open ; dann ROM oeffen 

116 FC49 CD 9680 call  FCTST 


181 
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MÜNIO 289 


117 FCAG 
118 


132 FC4E 
133 FC52 
134 FCSS 
135 FC 
136 FCSb 
137 
33 FSU 
139 
144 
14 
142 
143 
144 FCSU 
145 FC] 
14r FÜR4 
147 FC67 
i48 
149 
15% 
151 
152 
153 FC&A 
154 FCbB 
155 FC6E 
156 FCRF 


12 IC 


carnın! 


ED 72 FE7E 
31 FECA 


‚conaut: 


ED 73 FETE 
31 FECh 
cD FÜC2 
CD #321 


F5 cc 


ED 78 FETE 


157 FC73 09 


153 
159 FC74 
169 


164 
165 FC74 
166 FC75 
167 FC7& 
169 


182 


.conost! 


28# 


ir cc 


’ 

IE > 33337337777 7774 
; Akonsoleıngace & 
ı Kakragttktirkike 


i 


; Eingaberoutine wartet oıs Zeichen anlıegt 
; Bringt, Zeichen in <A> zurueck - anne Echo aut Erioschıre 


la (spsay),sp 9, 
id sp,tstack 





call open 

call FCI 

jr ec 

; Zeichenausgade ueber (> 

id (spsav),sp ; rette Benutzer Stack 
13 sp,tstack ; .. genn rinnen wırd's 
call open 

call FW 

» {A retten und ROM 'zu’ 

push at 

call ciose ; schiresse RiM-Bereich 
pap at 

ld sp, (spsav) ; Benutzer Stack 

ret, 


' GP ist "ımmer’ bereit 


2 


xor a 
get a ; FF ohne ZERÜ-Flag 
ret 

; Akkkreckikkrkere 

X AX Kanal * 

5 RRERKIERERRREI KK 


. 
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175 
176 
177 
178 FC77 


184 FC77 
135 FC79 


196 FC7F 
197 FÜR2 
192 FCB4 


206 
247 FC37 
263 F039 
209 FCSB 
219 FCSO 
ZI FCRE 
212 FCM 
213 
214 
215 
216 
217 
218 
219 
229 FCS1 
221 
222 
223 
224 
225 
226 FC3l 
227 FC95 
223 FC# 
229 FC% 
239 FCH 
231 
232 


CD FC77 
23 FB 
DB EC 


b (9 


DB ED 
6 19 
2 FA 
79 
03 EC 
(9 


ED 73 FETE 
31 FECh 
CD FCC2 
cd 9218 

18 CA 


‚auxist: 


‚auxin: 


‚auxaut: 


‚list! 


; MIX als SER-ielle Schnittstelie 


0 


: AK Eingabe-Status 


in a,(ustal) 
and ea rn 
ret, z 

or -] 

ret 

ı AUX Eingabe 
call ‚auxist 
jr z, .auxın 
in a, (wat) 
ret, 

; AUX Ausgabe 

ın a,lustal) 
and 
Ir Z, .auxaut, 
14 a,C 

aut (ydatl),a 
ret, 


; kktakpkakktkrtek 


; * Drucker t 
ı khakckkrkekkrkrr 
; Oruckerausgabe 
1d (spsav),sp 
14 sp,tstack 
call cpen 

call Fi 

jr cc 


a 


nicht bereit 


‚ onne Farıtyr Mask ıerung 


..nech nıcht, bereit 
Zeichen uebernehmen 


; ausgeben 


183 
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242 FCA4 
243 FCAS 
244 


253 FCA3 
259 FCAS 
268 FCAA 
26] 
262 FCAB 
253 
264 
265 
266 
267 


268 FCAB CO FCAG 


269 FCAE 
270 FCBO 
271 FCB2 
272 
273 FCEI 
274 


184 


23 FB 
De (£ 
(9 


‚Istst: 


.casıst: 


casın: 


.casaut: 


; Drucker Status 

ın a,(censtb) 

rrca ‚ wenn CARRY=nıcht bereit 
ccf ; gaher wachsein 
sbc a2 Ka {sFr ti 
rat, 

‚ hekkspktitkikerr 

; t kassette i 

\ RRRRKHRRERLER RER 

‚ kassetten Einaabe-Status 

ın a,(cmdcas) ; Status lesen 
rrca ; Kl ın Carry 

sbr 3,3 

ret, 

i 

; Kassetteneingabe Zeichen in (A) 

i 

call  .casıst ; rweStatus pruefen 
jr z,.casin ‚ warten bıs bereit 
ın a,(datcası 

ret 

i . 

; kassettenausaabe 

’ 

in a, (cmdcas) ; tx-Status prueten 
rrca ; tx in Carry 

rrca 

jr nc,.casout warten bıs frei 
19 a,c ; Zeıchenuehergabe 
aut (datcas),a ; Ausgabe 

ret, 

i 

DB > 3795935953 7759 

ı % Bootkarte * 

; Bpkprkehgk 
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294 ı Die BOÖT-karte entnaeit, FLÖMON ung ELTN garueberninaus 

295 ' aınen derzeit nur von FLOMON Denuzzten RAf-Gereich 

Baice Programme (Ad ger Rä-Bereich (waren SUR) sınd zum 

297 ‚ Betrieb von (P/M3 natwennig. 

2u8 : Dıe EiNT-Karte uenernimmt, garuenerninaus nach gie Bankusschaltung 


301 FEED setonk: 


‘ Bank wird entsprechend nem Inhait, ın (A> gesarzt 
5 : Diese queltige Eankagresse wird In der Yarıabien 
» CURENK abgelegt um bei (LOSE entsprechen] schalten 
: zu koennen. Gleichzeitig wird EPRüM angeschaltet 


310 FEED 32 FC ld (curbrk),a ; Anlegen 

311 Fcca 18 9A jr el 

312 

13 FCC2 pen! 

314 

315 ; 

316 ı Bontepron freigeben zum Zugriff 

317 r 

318 

II FC A FCH 13 a, (curbnk ) ; gerzeitice Bank 
30 FÜC5 CB BF res Ta  oeffnen 

321 FCC7 1205 jr cl2 

322 

323 FCC9 clase: 

324 

225 i 

36 ı Boot-Eprom anschaiten 

327 ' 

323 

329 FCCI 3A FC Ib] a, (curbnk ) ı gerzeitige bank 
39 FLCC CB FF cell: set 7,3 ; schliessen 

331 FE 03 08 cd ut (bbpart),a 

332 FC CR BF res 7,a ; Original zuruerkgeben 
333 F(D2 (9 rat, 

334 

335 

35 

337 

38 

339 

34 

341 FCD3 ‚int! 


153933377333 37 591 
% INIT x 
RRKRKERRRRRRRRRR 


! inIT wird bereits von FLOMÖN uenernomaen 
345 es bleibt hıer nur AUX zu inıtialısıeren 


347 
38 FCOI E 8 ld a,  ;2Stop-&bit-ınt GEN-Iodknaud 


185 
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349 FCOS 03 EF 
359 F7 EW# 
351 FCO9 03 EE 
352 FOLB 03 
363 


186 


aut" 


la 
14 
rat 


iyconi),a 
ER LIDIEN) 
(ucmal?,a 


reine Farıty-normai-nısinT-DiRiow 
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354 DE 6396539693 7903935323303740397355793073573372777975982907754%771 
355 x 8 
356 ; * Dies ist eın eıgenstaenaiger Floppytreiser ger NICHT im B4 
357 ; * interrupt-Betrieb arbeitet und eine Bankumscnaltung (wie in & 
358 ; % CPM3 verlangt.) vornimmt. % 
359 GR | x 
260 ; X Es wurde bewusst ger Syntax ges FLÜMÖN beibenalten um ı 
3] ; % von aıeser Seite her kompatınel zu bieiben x 
32 x i 
33  % Aus Einschraenkung zur kompatibılitaet gılt isuguichme & 
364 ; & neue Einsprungagresse t 
#5 x r 
366 ; KRROODRERKRRIKERSHRRRRKKSRRRRSKKERKHTIKES HI ERFÄR RER RR IR FR RChER 
367 

368 ‚comment, % 

369 

370 Programmteile in GRUSSCHRIFT sind ÖRGINAL-Code aus dem 

371 FLOMONI (1.6) von Roif-Gıeter Klein. 

372 Einer mosglichst weitgehengen kmpatibilitaet wegen wurde 

373 soweit moeglich ger Origınal-Coge uebernosmen. Wesentiicne 

374 Aenderungen wurden im physikalischen Cıskkettenzugriff 

375 vorgenommen Ja unter CPM3 nicht ım Interrupt WüE 1 gearbeitet 
376 werden kann -und MIGE 2 nıcht masalıch ıst. Alle Treiber- 

377 Routinen wurden fuer POLLING geschrieben. Darueberhınaus wurde 
378 oıe Bankumschaltung beruerksichtigt. 

373 

3 Einige Aenderungen wurcen garueherhinaus vorgenommen um den 

33 das Programn kompakter zu bekommen - ouer auch ger vebersichtlicnweit 
= naiber, Diese Programateıle sınd in Kieinscnrift 

24 S5agai Raoul O0. Koerber nach Ähsprache mıt nerrn kisın 

35 

x FÜCSEL als Leseport 

337 

K 7 5 5 4 3 ä I L) 

339 

3 Rd INTRO MEADLO unbelegt 

391 #=request 

392 derequsst, 

393 I=head cown 

394 

395 FOCSEL als Schreibport 

3% 

347 7 6 5 4 3 2 ! 9 

398 

399 ssco moten aını dense d c h) a 

466 

4a] I=Seıte 1(2) 

492 @=Motor an 

443 I=Mını laufwerk 

464 i=$ingle Dense 

45 L 

406 

447 FFFF neu equ ariffin 

408 

499 ’ 

419 ; kesktakkkrakecke 

MM ; * Floppy x 


187 
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42 737333 733757777° 
413 ; 
4iä 
415 
415 FCC FLUPPY! 
417 
48 ; 
413 ‚ gas wesentliche an aıesen Treiber ıst,, gass er Om Interrupts 
4 ; arbeitet --- oer Kontrolier 179x gıbt Jemocn nach Befanısan- 
421 ; arbeıtung IMMER einen Interrupt aus ... oıes kann bei oer 
22 ; Kontrollerkarte aus dem ELEKTRUNIKLÄDEN mecnanıscn (Jumper) unter- 
423 ; grueckt weroen, bei FLÜZ wıra ares jedoch etwas konplızıert - 
424 ; 85 wurde daher eıne software-Loesung vorgezogen um IMMER 
425 ; kompatibel zum Enaten ueber FLÜMÖN fuer CFMZ zu bleiben 
46 } 
2 U 
428 FC F3 a ; keın interrupt 
49 FR 08 Ib] a,forcei ; Reset Kontroller 
4:0 FOR 03 C9 aut (fgcemd),a 
431 FCEI ED 56 ın \ ‚ im normalen I-madus bieten 
432 FÜE3 CD FOSC call  sortex ; jetzt Betehl ausfuenren 
433 FCEh F5 pusn af ; rette Fehierstatus 
434 FCET GB CA flopl! ın a,(facsel ) ; lıegt eın inT an? 
4:5 FCE9 (8 77 bıt h,a 
4=FCEB 2 04 jr z,flop2 I... wenn nıcht 
437 FCED CB CA in a,(facemd) ‚ sonst Interrupt ruecksetzen 
AS FCEF 18 F& ir tlopl 
453 
449 FC F} flopz! pop at : Fenlerstatus 
4al FCF2 FB En ; nun interrupts wıeger zulassen 
442 FCR3 (9 ret. 
443 
444 
445 FCF4 SETUP! 
445 
447 ; 
443 ; Sektor Register Lanen - und Laufwerk ansprechen 
443 ; 
459 
451 FCFA MA FC3S ld a, (ddbnk ) ; Zıeibank 
452 FCFT CO FC24 call setbnk ; setzen 
453 FCFA CD FEAI call osel ; nun Laufwerk ansprecnen 
454 FCFO F5 pusn af ; Rette SELECT U 
455 FCFE 76 ld a,e ; Sektorregister setzen 
456 FCFF 03 C2 aut (facsec),a 
2 Fol de C3 la c,fdcoat ; Adressport nach <c)> 
4 
459 ; 
464 ı testet ob der kapt nach geladen ist und setzt oıe Seite 
2 ı Entscheidung fuer sso-Bıt ıst sıoeselect ın Register {C) 
4, i 
463 
464 FÜR3 de od LD E, nn ; Flag fuer SS0-Bit 
465 Fi45 Fi pop af ; SELECT 
466 FDR6 CB 7F bıt 7,a ; teste sıoe-select 
467 FÜRd 28 92 JR Z,xTup ; wenn Seite A(1) 
arg FIRA 26 62 LD Bi, ; muss sonst Seite l(2) sein .. 
469 
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476 FOX, 
an 
42 
473 
474 
475 
a7E FÜR 
477 FRE 
473 Folie 
473 FOli 
49 FOl3 
451 
422 
423 FOI4 
434 
455 
45 
487 
483 
453 FOI4 
4% FÜl7 
431 
432 FOlY 
433 
444 
435 
4% 
437 
48 FI 
43 
Sea FOIC 
561 FOIE 
Sa2 FOIF 
563 FO2i 


54 FD23 0 
545 FO24 . 


Soe FDZG 
597 FOR 
569 FO2A 
543 FOXC 
Sid FOZE 
51] 

512 F031 
513 F033 
514 FÜRS 
515 

516 FO3E 
517 

sı8 FOR 
519 FOA 
5 FOSR 
521 FÜR 
522 FDF 
523 F049 
524 FD4Z 
525 FO44 
526 FD4s 
527 FO43 


DB (4 
EB 24 
ca 
(8 9 
c9 


CD FCR4 
18 ir 


CD FCFA 


SETWP: 


WRFLP! 


getgata! 


ra2! 





; pruefan oo kopf "unten’ 
IN i 
AND ; 
ret i 
set ’ 
RET 

; Fioppy-Sektor iesen 
Cal SEiyp ı 
jr getaata ‚ 
; Fioppy-Sektor schreiben 
AL Tr i 
LD A,wrıtes ’ 
ÜR 3 ; 
UT (FOLCHD) A ' 
In A,(FICSEL) ; 
ALCA 

IR N. vr ; 
in a,(focend) ; 
bit l,a 

ır zur? H 
Wr 

Ip wr2 ; 
bıt #,a ' 
ip nz,wr2 ; 
jr rwoone i 
LDd A,reaas 

OR B 

AT (FOCCHDI A 

in A,iFÜCSEL) ; 
RLCA 

IR NC.RDI 

IN A,(FOCCMD) ; 
bıt 1,a ; 
jr z,ra3 ı 
IN 


sonst zusaetziich ÜtLAY 


Status Fort 
head-10ad Eıt 

. wenn bereits aut Disrette 
sonst tiöms melay ... 


Register und sso vorbersiten 
Poll nach Daten 


Register und ssa vorbereiten 


write 

ssQ 

Schreibbefehl ausgeten 
warten bıs ÜRQ na 


dann Wert, ausgeben 
num POLL aut Du 


POLL aut Bisy 


i ... weiter 


; evti am Enge? 
‚ wenn nıcht ... 
ı sonst gemeinsamer Aussprung 


warten bıs Of 


Status 
rg? 
wenn nıcht .. 


189 
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528 FÜ4A 
52 
5: FO4L 
531 FÜ4F 
Ey 


532 FOß2 


544 FÜSL 
541 
542 
543 
544 
545 
546 FOSD 
547 FOSE 
543 FDsa 
543 FO6] 
SW FÜR} 
SS] FüS4 
552 FOR 
553 FO6s 
554 FO67 
555 F069 
SSE, 


527 F076 
553 F073 
529 FO74 
57% 
571 F075 
572 
573 
574 
575 
576 
577 FD7S 
573 


190 


(3 FO42 


(8 47 
(2 FO42 


{5 
7A 


EL 03 (3 


IC 
{D F077 
cl 

3 


0 


(0 FEA] 


ra: 


aOne: 


DeLAY: 


ll: 


RSTORE: 


sort! 


P- ra ; naecnstes Byte 
bıt #,a ; ncen Eisy? 

Ip nz,ra2 ©... wenn Ja 

pusn at ; Kette Fehlarcane 
la a, iAcank ) ı (Pü-Bank 

call  seton ; wiager einsteilen 
pop af ; Feniercage zurueck 
and I] ion ; setze Fenlertlags 
ret 


ı Warteschieife Je Qurcengang ca ins !neı dAnz) 


push de 

la b,2% 
mp 

aınz dell 
POP br 

DEC EL 

LD A,6 

ÖR C 

Ir N2,LELÄY 
RET 


; Spur anfahren C=Drıve D=Spur 


push be 

LD A,D ; Track 

ar (FOCDAT),A ; ıns Öatenragıster fuer 
LO B,seek 0. Seek-Befenl 

call mıt 

pop de 

ret 


; Spur # anfahren 


la b,home 


; Ausfuehrung RESTORE und SEEK 


call dsel ; Laufwerk ansprechen 
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536 FO7A 
537 FOTO 
533 FÜ7E 
539 

so Flo 
591 FORZ 
532 FIR3 
593 FOSS 
594 Fü87 
535 F039 
5% FOSE 
597 


622 FüSl 
623 F093 
624 FÜR 
625 FL97 
626 
627 FÜR 
623 
629 
69 
63) 
632 
633 
634 
635 
63% 
637 FO3R 
63 F09 
639 FOX 
649 FÜR 
641 FDA 
642 FOA2 
643 FDA3 


78 
B7 
208 


7A 

eb 93 
32 FEEA 
AF 

(3 


Ar 

32 FERB 
79 

32 FEC 
E6 HF 


4F 
aM FESD 


busy: 


nusyli 


SÖFTER;, 


SOFTI: 


la a,isteprate) ; Steppingrate 


or b ‚ in FüC-Befenl ınzegrieren 
aut, (fdecmm),a I... austuenren 

ın a, (faceme! I... erst warten oıs fin 
TTca 

jr nc,nusy 

ın a,ltaccmyı ; umd @ann warten Dis fertig 
bıt 2,a 

ir nz.busr! 

ret, 

i 

; Fioppy-Kernrautinen 


; hizadresse, detrack essektor 
‚ b=Befehi #=Steprate setzen I=read Zeurite 


; caLaufwerkscooe 

LD A,E ; Eeteni 

üR A  ... setze steppingrate ? 
IR NZ, Tl ;... wenn nıcht 


; Im ürigınal-Treiver ıst Eıt 7 oas sso-Flag - wırg aber 

; nirgends ernsthaft nemoetigt, Ja IMMER verlangt vırd, cass 
sige-select. im SELECT-CGLE (Resister <C’) gesetzt ıst 

In sıesea Treıner auss Funktion SET-STEPPING-RATE ih) 
nur Erstmals (falls anders als 3ms) acer bei Aanaerung 
aufgerufen wergen 


ii) A,0 ; \iebergabe in (D> 

AND We ı sıcherheitsnaiber wegen 'aitem’ 559 
LD (STEPRATEI,A 5 stepping-rate ablegen 

KÖR A ; Fehlerfrei . 

RET ; zurueckmelsen 


; Schreiden oder Lesen 

ı es seı nachfolgend unterschieden zwischen! 

; SELECT = Laufwerkeode-Dichte-Laufwerkstyp-sıgeselert 
r Lautwerkscose = Bıt 0-3, entscheidet welches Lautwerk an- 

: gesprochen wırd 


KÜR A 

W (FEHZA),A ‚ Fenlerzaehier zuruecksetzen 

Ld At ; SELECT 

LD (CCODE) A ; ablegen 

AND emllio ; fuer Vergleich nur Lautwerkscode 
Ld ‚A ; ... zurueck nach (C) 

LD A, (DRVAT) ; ist das angesprochene Laufwerk 


191 
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644 FÜR: 
645 FOAZ 
646 FDAA 
547 FÜRC 
643 FEAU 
649 FÜAF 
650 Füth 
55] FüBi 
652 
654 
555 
656 
657 
658 FÜR4 
659 FÜBS 
656 FDR7 
bhl FÜRS 
662 FRA 
663 FOBB 
664 FORC 
665 
656 FDED 
667 
8 
659 
5 
671 
672 
673 
674 
675 FORD 
676 FÜBE 
577 FÜRF 
673 FÜC2 
679 FÜCA 
65% FOCS 
631 FOL& 
632 FOC3 
633 FDCI 
624 FOCA 
635 FDCD 


799 FOOD 
791 FOEA 


192 


FE FF 
313 
Er 
2 
Ba 
5 

(5 

ZI FEBE 


MITDER; 


(Pneu i ... nech ’unnenutzt' ? 

IR Z,NOTDEF ; aann einloggen .. 

AND welilio ; Mur Lautwerkscoge relevant 

(P c ı Vergieich ob Laufwerkevechsel 

IR 2, NÜRSEER i wenn zleıcn - nur SERK natwenag 
Pin HL ı ratte ÜMh-Adrasse 

a © ; Eeteni und Laurwerkscage 

Lö HL .DRvTäB ı Easısadresse ger Laufwerkstanelis 


‚ In Laufwerkstabeiie wırd ger momentane innalt es 
: Trackregısters angelegt 


Ld GA 

LD B,# 

ADD HL,EC ; Berechne Agresse ın Tabelle 

in A,{FOCTRK) ı lese Track aus Trackregıster 

LD inL),A ; ung lege ın Tabelle ab 

Füp BC 

For H 

ı 85 wırd hıer nachgepruett oo gas Lautwerk "vorhangen’ ıst 
; Das Trackregister wırd »ıt 2ea Innait oer Laufwerkstabel ie 
; gelacen Eeım ersten Lagen ıst cies eın FF - also eın "nıcht’ 
; meglicher Track - ales wıra hei SEHK Janoch erkannt . 
ASH HL 

PUSH BC 

LO HL, ÜRVTAB ; Tabelienstart 

id b,6 ; <O ıst Laufwerkscoge 

AD HL,EC 

LD A,ihL) ; lese 'lerzten’ Track 

UT (FOCTRK) A ; aresen ıns Trackregister aes FK 
Pop BC 

FÜp HM 

LO A, LCCODE» ‚ gas angesprochene Laufwerk 

LD (ORVAT),A ; Ist nun das 'neue’ Laufwerk 

P&H BC 

id be,] ‚ I ms warten 

CAL  DELAY 

call dsel ‚ nun Laufwerk ansprechen 


’ 

; nachfolgenger Delay hat an aıeser Stelle wenıg Sınn, wenn 

; ger Motor nıcht mıt ÜSEL anlasuft .... ist bei entsprechender 
i Junper-Stellung bei der FOC-karte aus dem ELEKTRÜNIKLADEN 

; jedoch ger Fall ... 


LD EC,35 ; ca as... I5ns 
CALL  DELAY ; ua head-load-Zeit zu beruecksichtigen 
POP EC ; Befehl und Lautwerkscode 
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792 FDEI 
793 
784 
705 FÜE3 
706 


797 
703 
769 
719 
au 
712 FOe3 
713 FOES 
714 FOE7 
715 
716 FOEI 
77 
n8 
713 
79 
72 
122 
723 
724 
75 
726 FLEI 
727 Füct 
728 FORD 
789 


744 FÜEF 


743 FOR] 
759 FOR3 
751 FOFS 
752 FÜF6 


18 


ERE 
EER 


% 


NURSEEK: 


NR: 


NODUM: 


TRY; 


JR MÜRI ; teste aut READY 


Laufwerk und Track sing erkannt - nun pruefen ob 
Kopf autliegt 


IN A, (FOCSEL) ; wenn kopf unten 
AND ll 
IR NZ, NODLM ; Ist keın Dumny-SEEK notwengıg 


; hier vırd ein SEK veranlasst - oenn nur so kann oas 

; Vorhandensein einer Diskette beı FLÜ2 geprueft weroen, 
; da ale Laufwerksansprache MR in Verbindung mıt SELECT 
; und HEADLOM erfolgt ... bei 'nard’-veraranteten keAuY 
; Ist gıes jedoch keine Loesung ... 


CALL SEEKEX ; SEcK ım Laufwerk aut ReAvY zu tasten 
rica ; RrAgy? 
jr c,nurl I 2... nochmal 


an dıeser Stelle ist ia Originaipragramm eine enalose 
Schleife - eın 'versehentliches’ Ansprechen eines Lauf- 
werkes das es nıcht 'gıbt’ oder ın dem keine Dıskette 
eingelegt ist, fuehrt unweigerlich zum Programmabsturz 
Ein TIME-QUT kann leider nur mıt hardware-Aenderungen 
eıngefuehrt werden, da eine Veberpruefung ob eine Diskette 
eingelegt ist MR bei laufenden Motor erfolgen kann .. 


hıerher wenn Kopf unten und Laufwerk READY 
Es wırd gepruett ob eın echter SEEK ausgefuehrt werden 
muss oder evtl zuerst eın RESTORE. 


A, (FOCTRK) 
neu 


IN vas steht im Trackregıster 
cp 3 

JR Z,TRY 

cp D 

MR 


nıcht definiert - neues Laufwerk 
... dann zuerst RESTÖRE 

oaer scron auf dem Track 

ja, oann lesen oder schreiten 


Z,5Kl1 


SEEK ausfuehren 


193 
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768 FÜFB CD FERA CAL . SEEKEX ı SEEK 
TKI FOFB E6 AND Tea 1 a ı READY und RNF(SEEK)-Fenier 
Te2 FD 2 18 IR Z,5kll » ja can R/W moeglich 
763 
754 FDFF TRY]: 
765 
768 r 
767 ; Laufwerk noraieren und KSTÜRE 
78 i 
763 
710 FÜFF (5 Pin 8 
7m Feia CO FE7S CML RSTÖRE 
TIEFERI C} Pür [Sr 
773 Fea4 CO FEB call  seterr ‚ Fenierzasnier +1 
774 FEO7 FE AA (P ie ; beı I# Fatal-Fenler 
715 FERI 38 E0 IR EC, TRY ‚ sonst nochmals mıt SEEK prooieren 
775 
7 i 
73 i Sttk-Fenler wergen als harıware-Fahler mıt Case FF, 
773 » gesetzuem CARRY-Fiag und NZ-Fiag zuruerkaemeidet 
78 F 
731 
732 FEOB AR nagoad! xar a 
733 Fe nec a ; Fenierfiag beı SEER oner RESTÜRE 
734 FED 37 SCH ; #tin, carty als Feniertlag 
735 FERE (9 RET ı ABERUCH FATAL 
75 
787 FERF Sell: 
7233 
789 h 
7% ; Laufwerk und Track erkannt, nunb r/w ausfuenren 
7% n 
732 
7933 FEOF A FERC ld 3, (ccode) ; SELECT 
734 FEI2 4F ld c,‚a ; nach <C) 
795 FEI3 ES push hl 
7% FEI4 (5 push be 
737 FEIS 95 oet d ı vırd @ wenn E=] (read) 
732 FEIG 24 97 jr nz, WRTEX ; Schreiodefehl 
739 
Ei) n 
5 ; lesen sınes physikalischen Sektors 
2 i 
BR} 
294 FEIS CO FDI4 CALL  RUFLP ; und Lesen 
FEB EEK AND IE} ; Fehiermaske ohne Fahlar 647 (vp-wf) 
Ss FEID 18.03 jr reterr 
#7 
228 FEIF WRIEX: 
299 
&io E 
Ei ı Stnreipen eines pnysikalıschen Saktors 
12 : 
313 
814 FEIF CD FDII CAL  URFLPR 
85 FE C) reterr: POP EC 
816 FEZ3 El POP HL 
317 FEZd CR ret z ‚ venn Fehlarfrei ... 
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MONIO 


818 FEZS 
319 FEB 
829 FEZA 
321 FEXC 
822 FEiF 
323 FE3l 
824 FE33 
325 FE 
S26 F&37 


234 
825 FE39 
3% FcX 
837 FEB 
333 FE49 
233 
844 FEA] 
341 


867 

863 FE4U 
869 FE4E 
876 FESI 
8371 FES3 
872 FESS 
373 FES3 
874 FESB 
875 FESC 


32 FE6I 
(B 67 
20 03 
Ch FERI 
FE 08 
3% 
A FE6I 
87 

7 

3 


seterr! 


3A FEsC 
(B F7 


5 03 C4 


(8 B7 
03 C4 
(9 


boot! 


9 9121 


ld (errcod),a ; sonst Fehlercaoe abiegen 

bıt 4,a ; RNF-Fehler ? 

IR NZ, ıRY] ; cann gleich neuen Seek austuehren 
call seterr ; angere Fehler zashien 

cp N ; 1% Versuche zulassen 

jr e,skll 3... Fehierschisife Üjöf) 

ld a,lerrcag) ; letzen (ächrein-Lasetanier) 

ar a 

sch ; Fenlertiass 

ret 

; update nas Fenierzaehıers 

id a,(fenza) 

ine a 

ld (fehza),a 

ret 

; Ansprechen des Lautwerkes. SELECT wird in CCÖLE erwartet 
la a,(ccooe) 

set 6,3 ; Reset MITÖR-ON Bıt 


res 6,a ; genn aleser muss geroggelt werden 


aut (facsel),a ; wegen MV ın FÜC aus cem ELEKTRÜNIKLAUEN 
out, (fdeselt,a ‚ hat aber keinen Eintluss aut FLÜ2 


ı kaxrkktigkkkaskek 
ik EWT x 
5 RARKRRRRAKKERKAK 


; liest ersten Sektor auf eıner Mini-üiskette 

; fuer MAXI umter CPM3 nıcht vorgesehen aa nur sıngle-gensity 
; SICHER moeglich .... wır verwenden den ELWÖN-Stack 

; jedoch nur bıs zum Einsprung in CPMLDR ... 


xor a ; Sıcher Bank # einstellen 

call setbnk 

ld 4,8 ; steppingrate 3ihims auf Seite # 

ld b,9 ; Befehl 4 ( set step ) 

call _.floppy ; direkt ... 

id hl,secbuf 

psh hl ; Ist auch EXECUTE-Adresse 

ld be,121h ; Befehl=lesen Laufwerk 'A’ Seite ® MINI 
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MNIO 250 


876 FESF 11 Aal ld de, kin ; Track @ Sektor I 

877 FES2 CD FC call _.floppr 

378 FEBS De ret nc ; wenn onne Fenler -— austuehren 

379 FEBE (3 Ga jp entry ‚ sonst EiWT-Fenıer ( mıt ?7? gemeizet ) 
281 B 

2 ‚ Adsskttkgkiiikgr 
883 sk RAM i 
34 ‚ kaktigkkekkkigeg 
355 ; 

3 

387 FE6I 
523 FERA 
889 FEEB 


errcod: 
STEPRATE:DB 
FEHZA: OB 
3% FERC CCiDE: 08 
831 FE&D DRVAT: DE 
892 FEGE DRVTAB: rapt 
893 FEGE 
394 FEGE 
895 FEGE FF 
39% FEGF FF 
847 FE7O FF 
33 FETI FF 
899 FE72 FF 
a FE73 FF 
1 FE7A FF 
2 FE7TS FF 
3 FE7G FF 
94 FETT FF 
5 FE7S FF 
6 FE7I FF 
#7 FEIA FF 
8 FEB FF 
9 FEIC FF 
91a FETD FF 
911 FEIE Adna spsav! 
SI2 Feb 9049 uff: 
2. FECA tstack equ 
14 
95 BEL EIER SFETT EFT FESSTTETETEEFERTTRTFTRCERERESDERSSETESTERTTETS EN, 
EI} ;* Ende des hardware-Treiders X 
97 RRRRERKRKRIOKRERERERRREEKRRRRERRRERRRRRERKRRRRRRRRRRNCHEF HERR U 
Error(s) Detacted. 
65216 Absolute Bytes. 179 Symbols Detecteg. 


ı Nerker fuer mie Steprate + Si)-Üption 


; Fehlerzaehler fuer retry 
; Orive-Cone 


; letztes Lautwerk 
: 16 Laufwerke 


NELEE 


PPpr>rrpr>rr-rpr>r>r>rr>r>r>D> 


; hıer wırd Stack gerettet 
; hıifsbuffer und Stack fuer ROM 


B2sB8888959888588338 
TETREELBEERBEZRERRER RR“ --- 
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Cross Reference! 


FETF  .AUXIN % 1% 197 
FC77  .AUKIST 7 IR 1% 
FC37  .AUXOUT SM 209 
FCAR  .CASIN 6 262 269 
FCAG  „CASIST u 
FCR3 „CAST 62 273 2% 
FCAE .CONIN 2 15 
FÜSF .CONIST sı 185 
FC74  .CONOST I 159 
FESD  .CONUT 3 18 
FCOC  .FLOPPY 64 46 972 377 
FCO3 „INT nn 34 

FC9 LIST 2 54 20 
FOR .LSTST 2 
FCBD  .SETENK 63 

FO3& &CENK 2 54 

FC35 MERK M 45) 

FCAF  AUKIN 5 

FCI2 AUXIST 57 

FCoC. AUXOUT ss 

Ca EBPORT 2 3 

007 BELL 2 

0929 BLANK 2 

SF BLEN 2 

FED BOOT 359 

eg ES 2 

Fi39 BUSY sw 592 

Foss BUSYI 53 595 

WICA CASBAS & 2 2 
FCiE CASIN 6 

FCiB CASIST Eu 

FCZI CASOUT 62 

FCAA CC 17 1% 193 2% 
FESC CCODE Bi 7 
43 CENDAT 2 

049 CENIN 2 

4049 CENSTB 2239 

Fecc CL a1 3% 

FCCE CL2 21 3 

FCCI CLÜSE 14323 

A CLS 2 

WCA CMUDCAS 2 27 279 
al CNTRLA 2 

03 CNTRLC 2 

#19 CNIRLP 2 

FCe3 CONIN 52 

FCAQ  CONIST 51 

FEB CONOST sg 

FCA6  CONOUT 3 

eu CR 2 

FC34 CURBNK 73 310 319 329 
RC. CURR 2 

CB DATCAS 2 20 2 
F06d DELI 3 549 
FOSD DELAY Ss u 5 7 
F077 DIT 7 50 
FE6D DRVAT 63 65 891 
FEGE DRVTAB 651 67 82 
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Cross Reterence: 


FE4] 
Lee] 
FE6I 
MB 
ro 
a] 
Bnca 


DSEL 
ENTRY 
ERRCOD 
ESC 
EXTEM) 
EXTSEG 
FCEAS 
FCI 
FCO 
FETST 
FDCCHD 


FOCDAT 
FOCIRQ 
FOCSEC 
FOCSEL 
FOCTRK 
FEHZA 
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453 
379 
818 
2 


nBRßnnn 


un 
S 


FRELESFBERTnnnnn 


Im 


FUIDER 


® 


585 
824 


444 


E77) 

87 

2 2 2 2 2 

a7 32 Si 


6 ww 2 3 


ro 
ro 


a 2 
wa ur 9 
Eu Ye: 2 Bu: ..7 BEE Se Ze 7 Ze 


ZEOASM SuperFast Relocating Macro Assenpler 29 Dec 85 19:03 Zu0ASm 1.24 Fage Zu 
Cross Reference: 


702 
643 
115 


wnının 
wm -nvonm 


a 
ro m rO oO Sn nn nn 


754 


® 


Dvn tn nm tn N N N N N N DD N nr 


716 
705 
124 


184 


728 


53 


79 


53 


145 


nn 
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227 


nv 


913 


al 
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Cross Reference: 


FO2I WRl 3 
FO uR2 Si 510 513 
FOR WR3 ss 512 
FDII WRFLP 432 514 
AS WRITES 2 5 
ra WRITET 2 

FEIF WRTEX TR ER 
FEB XBUFF 92 


209 


Kapitel 2 ‚., Formatieren zum Beispiel 


In (fast) allen Kapiteln dieses Buches ist von Tracks und Sekto- 
ren die Rede. 


Was das eigentlich ist, steht im Glossar, wie diese Tracks und 
Sektoren aber auf die Diskette kommen, davon war bisher noch 
nicht die Rede. 


Noch einmal kurz zur Klarstellung: 


Disketten werden über den sog. Schreib- Lesekopf beschrieben bzw. 
gelesen. So ein Kopf kann nur in ganz bestimmten, Laufwerksab- 
hängigen Abständen platziert werden. tblicherweise sind die Ab- 
stände so eingerichtet, daß je nach Laufwerk 40, 77 oder 80 
Positionen eingestellt werden können. 


Unter jeder Kopfposition kann man sich nun eine Spur vorstellen, 
die, anders wie bei der Schallplatte, einen in sich geschlossenen 
'Ring' bildet. Unter diesem Ring (oder auch Zylinder) versteht 
man nun den sog. Track (engl: Spur,Gleis). 


Auf einen Track würden je nach Diskettentyp zwischen 6 und 10 K 
Dateninformation passen, wenn man diese Datenmenge irgendwie auf 
die Diskette bringen könnte. Die handelsüblichen Kontroller- 
Bausteine sind nun jedoch nur in der Lage Datenmengen von 128 bis 
1024 Bytes auf einmal zu schreiben oder zu lesen. 


Aus diesem Grunde ist jeder Track in mehrere Sektoren aufgeteilt, 


natürlich auch aus dem Grund die Datenmengen in kleinere 
Einheiten zu unterteilen. 


Diese Sektoren sind nun natürlich nicht von selbst auf die 
Diskette gekommen, sie werden vielmehr erst mit einem speziellen 
Programm 'aufgeschrieben’. Dieser Vorgang heißt Formatieren. 


Um die Sektoren wieder zu finden, ist auf jeder Diskette ein 
durchgehendes Loch, das sog. Indexloch, angebracht. Wird dieses 
Loch erkannt, weiss der Kontroller, daß nun sofort der erste 
Sektor auf einem Track beginnt. 


Ab dieser Stelle werden vom Formatierer, (dem Spezialprogramm) 
auf magnetischem Wege soviele Sektoren auf die Diskette ge- 


schrieben, wie dies von (der speziellen BlOS-Anpassung des) CP/M 
benötigt wird. 


Damit der Kontrollerbaustein die einzelnen Sektoren auseinander 
halten kann, ist ein ganz bestimmtes Format, wie dies zu ge- 
schehen hat, vorgeschrieben. Viele GAP's, Leerzeichen und Kenn- 
zeichen müssen mit einem ganz bestimmten Befehl an den Kontroll- 
erbaustein geschrieben werden. 


Was da auf die Diskette geschrieben wird, soll der nachfolgende 
Dump zeigen: 
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11 


NÄNANRARNNN. 


++ 7% E 
zarserawenuen 
SUSE ELHENS 


Da 2 SIWIEHERH 
SIEH IE HERE ITED 
BZ ZZ Ze Ze a Ze Frist 
SHE NIS EBEIHEHSFE 
SIEH REIHE TUN 
SSH TEHTEHTEH 
EHI EHHFEHTEH 
SSH IH EHI HEITE 
SEEN EHI TBEIES 
FISHHEHNIEENER 
FEHFIHEFIHEERTED 
FEH IS EHFIFENFEH 
De Zar 2 20) 
FUSS SREISNUEN EN 


Assıadasilsies 


es wırd 1424 mal 'ES’ geschrieben 


un 


FR. 


1 
=: Ei 


ZUSWERYEN 
ee FEF SWG 
HESS HEFT FIG 
BUSH FEST SUG 
BUSH FEFHFEN 
BEE 

BEE YEDTSU 
BEYSYEIEES 
Wii FIESS “ 

USE YREISD 


BESSWERTEN 


EAE NANMNANNANNNANN 
2 NW. 


E 4E 


una. 
wi 


alas ıst bereits der naechste Sektor 
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Dies ist die Formatierung für einen Sektor auf Seite ® einer 
Diskette im NDR-Fornat. 


Im Einzelnen läßt sich der Inhalt wie folgt beschreiben: 


80 Bytes 4E Start-Lücke nach Indexloch 
12 Bytes 09 Preambel 

3 Bytes F6 Track Kenner 

1 Byte FC Index-Kennung 
59 Bytes 4E Warten auf Sektor 


Das folgende Feld wiederholt sich für jeden Sektor 


12 Bytes 09 
3 Bytes F5 Sektorkenner 
Bytes FE Start ID-Feld 

1 Byte 09.. Track Nummer 

1 Byte 09(®1) Seitennummer ® oder 1 

1 Byte ®1.. Sektornumner 

1 Byte F7 Prüfsumme ( 2 Bytes geschrieben) 
22 Bytes 4E Warten 

12 Bytes [’Y) 

3 Bytes F5 Datenkenner 

1 Byte FB Beginn des Datenfeldes 

19024 Bytes E5 Datenfeld 

1 Byte F7 Prüfsumme Datenfeld (2 Bytes) 
54 Bytes 4E Warten 


Ende eines Sektors 


Rest der Diskette auffüllen mit 4E'’s ( 200..800 mal > 


Wichtig in diesem Zusammenhang ist die Tatsache, daß jeder Sektor 
einen ganz bestimmten Kopf hat, das sog. ID-Feld. Es kann mit 
einem speziellen Kontollerbefehl gelesen werden und gibt In- 
formation über: 


den Track, über welchem sich der Kopf befindet 

die Seitennummer (® oder 1) 

die Sektornummer 

Angaben zur Sektorläne (0®®=128Bytes, 01=256Bytes usw) 


und dann noch eine Prüfsumme anhand derer der Kontroller 
feststellt, ob die Daten im ID-Feld den auch richtig sind. 


Der eigentliche Sektor (also die 128..1024 Bytes) werden üb- 
licherweise mit dem Zeichen E5bH gefüllt. 


Ein Programm, das diese Arbeit vornimmt wird nachfolgend 
abgedruckt. 


Der hardware-unabhängige Teil wird (aus Copyright-Gründen) nur 
als DUMP einer REL-Datei abgedruckt, die hardware-Anpassung als 
Assemblerdatei. Zusammengebunden werden die Programnsegmente mit 


dem Linker LINK.COM, wobei die Datei FORMAT.REL als erste einge- 
bunden werden muß. 
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nun 15 a} 2 a er De er SE ee : 
ERS ee = en 5 % ee Er a a ee RR 
a ne ni "Ge Fe; ee ee ea !ur A a 
Pe a ee ee BT a ee & ie in er :& Bes 
So :i! a“ Emo : ER BE we ie ie En SE et - Se: ee 
nn mann re | Dr rn eg = du er ee ET 
DE on en! Sa £ Se zraensn : x% * A En a ae Da OU Bi SE un 
ER E i. “ei a I !ui$ en a u: 1 
Ein. a: H DB an: a = ne a a er a nn ir Sa 
BESERREN EISEENES Friusrenm BANSSFEEE TELSOFELTELNO FNESSSEH ESEAISSS 
SSERYISY ZEUISERZE EIISTUSTER FRBEEBREE SPESSTDS UWESSTETE FEESESSES 
WRSFERITES FERSUIFTAT SPEBESES RSERLEET LOTEKERER ABSRRERRE GEEBERSSE 
un 


BRERTETER AREWBRERER SEIISDET BRÄDEERS BESTEREL EISHERET SSTRITER 
EREIKELT SUTESREEIS 5 38583 ZUGDEZEIR BOSSTIER SSEHZIEE ASEBERES 
FSSHERER SNERTIBEI TBEKRÄRUF TEESESKE BERSFIEE FLIBREIBER LISNLZEE 
IKESEIEROCHSELTSS SITZEBESUT ESEIERBD ZESEKISSEE ARESERIES HIRBEHREE 
ASSSEREN NNESTUBE TSELRESERE IREHBEHES ELBRSTES IRELASEEN EERSUSSS 
RRFRZERN BESNETER TNESELRES KRETTZTER ERTITELE HEIASRES ZBENTERFE 
ERZREDEN BEBEEBEIE SRIISLTEE KITENEREN USSHERIEER BERKERIS AZZERSTS 
BBERESEI ERIBDSETOCHTESTENR SSERLER ZUSLEST BIEETERSEN TSISEHER 
FREBSEBE BAEBERNE ERESESHS AISZBCERSEO BREIBRER TOASRÜRIT NSEECKSB 
SEFFIEER ERSERTIEN SHUHSRES TIENVESS EESSTIRÜR SOSRLTONE SE2233583 


—- 
RZERSBEL MIERTOME SIIREIER HIENWEER ILTESEDEE SRINSEHR ZTSENSER 
FRELIBER URDERSER BIRSUNER EISTEREE ZREDRTERT ZIESELRET SSEARED 
SESZEELIE EDERESEN BISERBER EREIABER RIESS2ESS SRESFREN ARSTER 
ERSISEE SRIRSESE SESHSHEE SESESEIE FSESSHEE SASESaSE Isssssıe 
a. ZRZESSEE INSEEES ERERESEET SSSI3RE ZESS2S85 23233335 
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SISEZERSE 
BEHRSSHE 
ERZENISSB 
SBELSSCHREN 
EINSTSSEE 
SSZEBDST® 
BSEESBATNR 
BELESHEN 
ZUBEISESE 
S$:35= 

EBIFESRTTS 
ABERESTS 
ESSERZRS 
BEE I83EU 
SERESS 

ZWEHFFSAEL 


22332333 


BEEBBTER 
ERSSEGEE 
E22 Freu 3 
NSESESRS 
BZEEZERTE 
TERITSTER 
GESEFESTS 
ERERSHS 
ZSELBEIES 
BRSCEIZBEL 
WIERESETR 
BSSRUERES 
LBESESTSS 
BSASSEISS 
BRZSISZEFRH 
EBSIEREITG 


2233235 


Be ee Er 
ee 
ne RT 
> u re 
2 in Se 
Ei 
E :% EEE: 
u 
. nl - 
N 
23 


BREESRER 
FELRTZASS 
FAESRTIH 
SS5IJU85 

SISESTENSE 
FREZEFESES 
SSENESHD 
FBZTZEITER 
BELZELRTS 
BELEIBHT 
EBAUBSSSS 
ESZBIELTET 
BBRERLSFLER 
SETTHETD 


38382228 


PR" Tr, 
u ie 
wm: m u: © 
Ei ses : 
nen Wine a m 
Per TE . 
Eu Hr "R 
A 
0m 7: 
(7 e eh 5 
ge ee ze 
ng en 

re ET - - 
an. a 


MSERFLEN 
SIELSTNSIES 


STIESSEN 
EREGIESS 


— ET a = 
573583 2 


SERSAREL 
GBSINESIE 
BSEZLEEIR 
SLENFSER 
a 
za828 
geanse 
SFEFESER 


GEERDERS 


ea! ion 
S8.: : Rr 
Be ee 
a Pe 
= - 597 m 
Dim ie: 
: ar 
u 
ee 
na Du 
= i Js 
ie hl a 


LELSERE 


os gu un 
a 253 DJ 


._._.— 


=: 
SEES 38 2RT23 
PSISZISEIS 
SSEIRANFS 
SSSSEITS 
ESSITREGR 
BEISSSSE 
BSETBTTSS 
I5EI52SE8 
332835 
38 ZERE 


an? BE 
6: on 
.ez an 
ö es 
Sen ee 
Fe er | 
N 
u 5 
EEE DE: 
ae 
u ee 


EBSERRED 
UESSTEHEL 
BEBESES 
EBESILESS 
ZIEHBELER 
RRREUFSERD 
SRERBATU 
EEEIRTERTE 


SEnaz 
IRZERrSES 
SSIRFERNE 
FZSEIESTT 
BERSESTG 
ZB248RD 
BLERTERE 
BEBSSSER 
ZIERSSEH 
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Be 


RSESESED 
ERSTETRRF 
BENZRAZT 
SZELEEZENS! 
EAERERTE 


REEESEIFTEN 


TBSELFPREN 


a ae Ba 
Be ae erh 'e 
Da 7 . . 
- u . - 
neo! se 
Be : 
ing el 
are: i : 
A, elle 
en en . 
'% pr 
Fe 20a ei 
a ZI m - E 


5 53 


EBESSASEN 
ZERSARTRISS 


SRFZASSER 


SPESTEHN 
VEZVESENR 
SRÜRFSTKE 
SRERRN2ER 
MEHSERTS 


— ao Sm ae 
< Ko 92 Ze EU VRSEn = Zu 


FIESATER 
ERZEN 


..._ 
222227225 


o 
w >. 
ED a 
MEN 3 
et 
Te 
— Zul . 
5 Serie i 
E-< 3 = 
ET ass =) 
aa 53 : 
ne —'n rd 
Er er SE 


EREDHEST 
ZERSEREN 
BEDESEIS 
STEHEN: 

ZSENERES 
ZIRTRENZ 


m SEIN m 
> Po Nom SS 


EEERSIEN 
FEIRSFTE 
ERZBSENFE 


ERTL E 


- E 2% 
=. Wa 
»+ 2 in. - = . 
rt. u --) 
= ni EP) | 
un : 
Pe = mn 
"o . . ar . 
per - = IN 
se -uNn“ 
FA EEE 
ar a nl 
Ss. "is28. 
e lach 
am: 
EIELESEL 
KIN RKAOEE 
een . oe. a7 
NFESUNNZ 


NELFEISES 


SEFIESARSE 
EEZNWEBER 


BZLENKEIZ 
ENAEISTSSH 
SEINISSOR 

REESESEN 
ZNIEHEFTU 
ENIZFREIER 
KELIEESN 

ERIENISES 


ABENESFZ 


glalzss 


FRECHERE 
24: :: 

PER 
TZREBEBEL 


PZEBRERER 
FREEEFREL 
EBITTERER 
NIHSBEBER 
IRESEREL 
FFRERELEE 
DELEZEREL 
ENSEELEL 
GSRBELER 
SIAUTELEL 
ASSSEBEL 
SEISERER 
NAEZSEREL 


is223235 
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FBIOS 


Zoosuseneoun. 


28 


ERBNSERSUDBS 


ERBATATHERERTER 
IERFIBSTE 


3 


SISESe 27 


44 


FFFF 


0007 


I °33334333335977337579777393573793736397799949929897277977499554 
& x 
; * Format- und hardware-Anpassung an den Unıversal-Formatierer 
x x 
 % Es duerfen alle Frim&-Register verwenget wergen 4 
; % KEINESFALL oen 2. Regıstersatz und mıe Register WundY  & 
ı X verwenden. Es stenen i6t2 Bytes Stacktiet zur Vertuegung x 
% x 
; KIRRRRRKKERRREKSHERKESHRARRRRRKLERKRHRKKHRRRRRRRRRLKFKKTHKRRSRRRE 


‚ kakssikkhrackrag 
; Vereinbarungen 
‚ krtsappkikkrız 
ja eu 1 
nein eq mt ja 
er eu ach 
If eu %ah 
bell eq an 
3337733777577 777 
; Linkadressen 
‚ khtzstprektiggik 


ı Aut folgende Ünterprogramme oger Labels greift gas Haupt- 
‚ programm zurueck. Ste muessen den angegebenen Spezifikationen 
ı entsprechen. 


public sıdmsk mini ‚maxi, soens,doens 

public drvtab, frmtab,naxfra, fbasg,usrlin 
public conın,cirs,chome,cleos 

public usksel,dostep, restor ‚wrttrk,rasec ‚motoff 
public image 


; Krapkltikktreg 
ı Vereinbarungen 
B3559745599797701 


folgenge Daten muessen sytemabhaengıg angepasst, werden 


ttHt Laufverke 


sela eq aaa) ; Laufwerksselekt 'A’ Seite All) 


207 


ZEHASM Superfast Reivcating Macro Assembier 24 Dec 55 49:32 ZunASm 1.24 Fage 2 
F&IöS 288 19 Dec 85 89:14 








59 a2 seip eu Oi ; Lautwerk 'E' - Seite All) 
5 [07 selc em ll) ; Laufwerk 'C’ - Seite dl) 
61 DE seld eu CENT er ; Laufwerk ’D’ - Seite #(l) 
62 

63 i 

b4 ‚ auf foigenge werte wırd aus Jem Hauptprogramm 

65 ; zugegriffen, sie muessen naher als Eyte vorliegen 
£6 ’ 

67 

Pu) sidmsk: db a) 

69 

70 al’ 20 an: db al] ; Select fuer Mini-Lautverke 
7 Om2’ a maxiı bb a) ; Seiect fuer MAXi-Laufverke 
72 at 1a sdens: dh Oo A ; Select fuer sıngle-gensitv 
73 ad’ 9 daens! ıb a) ; Select fuer mounlemuensıty 
74 

75 ; 

75 > RKKKRREKERKRERKK 

7  Laufverkstabelle 

73 ‚ Karkkrckkkckreee 

79 ; 

59 

31 ums arvtab: 

2 

E$] ’ 

54 ; Laufwerke sınd spezifiziert wıe foiat: 

61 

5 ı xarive+% JA oder WEIN je nacn Vornansensein 
37 ; xaorıve + | reiner Lautwerksselect onne sıde- acer zensity 
>] 5 und onrie MITÜR-ON sauer MiNI und MAXI Select, 
be2) ı xdrive + 2 steppingrate ( Unnnab. „wen io) 
% ; 

El) 

G2 Was’ FF adrıve: dh Ja 

33 Daah’ 9 Jb sela 

34 0007’ & OnENnEn | ı ms 

E> 

a FF barıve: db ja 

37 0003’ 02 db seib 

Eu) & ONE N 

E>] 

Io Ok’ AR carıvei db nein 

161 000C’ 04 db selc 

102 anal’ a0 db en) U) 
193 

1a4 Ge’ ddrive: db nein 

195 QRAF' 08 db seld 

106 ala’ ad db a) 

197 

108 Mall’ 08 earive: ab rein 

109 A612’ 90 db % 

118 2213’ 80 b.ı) % 

1m 

112 ala’ 8 fdrive: db nein 

113 0615’ 9 &b [) 

114 oel6' &b [) 

115 

116 17’ gdrive: db nein 
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117 9618’ 00 
118 e919' 00 
119 

120 wla' de 
121 9018’ 00 
122 maic' en 
123 

124 Ga1D‘ 0 
125 d0iE’ 90 
126 GRiF’ 00 
127 

128 0020‘ 
129 0021" 
1:0 0022’ 
131 

132 0023' 
133 6024' 
124 W25' 
135 

126 W026’ a 
137 0027' 00 
18 09 
139 

140 @029' 
141 Boa’ 
142 auze' 
143 

144 n2C' 
145 ml 
146 aaZE’ 
147 

148 our’ 0 

149 900 06 

150 31’ 00 

15] 

152 032° 0 

153 0033" 9 

154 0034" 00 
155 

156 

157 

158 

159 

168 

I6l 

162 

163 

164 

165 

166 

167 

168 

169 

170 1] 
ın Dal 
172 2 
173 0003 
174 


EEE ESE 


ESE EIE 


harıve: 


idrive: 


Jarive: 


kdrıve! 


ldrive: 


mdarıve: 


narıve: 


ogrıve: 


parıva; 


1128 
1256 
f512 
f1024 


338 838 333 333 3% 
=» 


3833 


33% 
2 


33% 333 3833 


i KRELEITRRRRRRKEN 


; Formatangaben 
; Krktekkcktkktee 


ı diese Angaben muessen Formatabhaengıg angepasst. werden 


ı Krkkkckekkkehtre 
; Vereinbarungen 
‚ satkkirtkgkhregg 


[) ı 128 Byte Sektorgroesse 
‚ 255 Byte Sektorgroesse 

$12 Byte Sektorgroesse 
; Ik Byte Sektorgroesse 


nm 
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175 035° 
176 

177 

173 

179 

154 

181 

182 

183 

134 035° 
185 0637' 
186 038" 
187 039° 
18 
139 w3R' 
IE 
131 030° 
192 MR" 
193 

194 0041 
195 9943 
136 44" 
197 @045’ 
198 dp’ 
139 0847" 
Zum RAR" 
zu 0049’ 
202 ad" 
203 

294 aD" 
205 BO4F' 
206 @n50' 
297 051’ 
203 0052" 
299 6953’ 
z10 054° 
211 0855’ 
212 057° 
213 

214 


210 


fratab: 


term: 


form2: 


form! 


fralen 
naxfra: 


fonsah 
ja 
’a 
4 
ya 
5 
r1a24 
xitla 
xitla 


fnsge 
nein 
nein 
7 
nein 
26 
tz 
xit2a 
xit2a 


($-fratab)/12 
frmlen 


33 223333333 223333332 223338332 


i 
s kkastkkkkackkrtz 
; Skewtabelle 

; kRkkkkktkklıkk 


B3339939933733797 
Kopfzeilen 
kekiekkkkpniir 


aıe folgenden Catan entnaiten alle Angamen aıe zum 
Autbau eines Formatierumgimages natwenalg sınd. 
Die kommentierte Reinenfalge ist einzunaiten 


; Text cer Spezifikation 


"ini-aufwerk ? 
acppelte Dichte ? 
Tracks pro Seite 
zweiseitig mosglıch ? 
Sektoren pro Seite 
Sektorlaenae 

Sektor SKEW Seite A 
Sektor &xkW Seite | 


Text car Spezıfikaticn 


ı Minitaufwerk ? 


oorpeite Diente ? 
Tracks pro Seıte 
zweiseitig mweglich ? 
Saktoran pro Seite 
Sektarlaenge 

Sektor SKEW Seite A 
Sektor &xEW Seite | 


Agresse ger koptzeıle 
Nini-Laufwerk ? 
doppelte Dichte ? 
Tracks pro Seite 
zweiseitig meglıch ? 
Sektoren pro Seite 
Sek torlaenge 
Sektor SKEW Seıte d 

. nur einseitig 


Endenarke fuer kauptprogrann 
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23 
234 N 
235 ; Dıe Texte der Kopfzeılen werden als Menue ausgegeten. 
23% ‘ Der Textaufbau sollte immer ger gieichen Anordnung entsprechen 
237 ; Pro Forsat ist eıne Zeile vorgesehen aıe iMtk mit einer 
23 ; FORTLAUFENDEN Bezeichnung, oeginnend bei ’A’ neginnen muss, 
29 ; Menues sind bıs einschliesslich dem Eucnstaben '@’ zugelassen 
244 ; Es wercen pro Menue nur 3 Zeılen ausgegaoen. [le neunte Zerie 
24] ; muss die den Text! 
242 F 
243 ; ’ (Z) weiter (W) wıeserhoien (X) ekit’,' '+Bin 
244 ’ 
2 ; entnalten und mıt den 7.Bıt gesetzt abschliessen. Danach koennen 
246 : weitere 9 Zeilen, ebenfalls mit obigem Abschluss foıgen Dıs 
247 ; Menue 'Q' 
243 ; 
249 ; Nicht, vergessen - oıe letzte Menuezeile mıt Eit 7 gesetzt tlı 
254 i 
25} 
262 a979' fbasg: 
253 
254 79° 2% 28 41 9 foasga: ab "(A m Track 2-seitig Standard NÜR' ‚cr, If 
25 Ama’ 20 28 42 29 ibansgb: db "«B) 46 Track 2-seitig Standard NR’ ‚cr,if 
256 &C7' 20 28.43 29 fonsgc: do "Cl 8° s5-5d Standard CP/M ',cr,1f 
257 Hu’ 20 28 44 29 Tbasadi db ’ cd)’ ‚er, 1f 
258 ee’ 20 28 45 29 fonsge: db "(Eier if 
259 Aura’ 20 28 46 29 fbnsgf: db "ÄF)’,cr,if 
260 BF 20 28 47 29 finsag! db "KG ,cr,if 
26) aloe’ 20 28 43 29 fbnsah: db ' kW’ ,cr, if 
220 3A [e ’ «Z) weıter (WI) wiederholen (X) eXıt',' '+Sin 
263 
264 A 22849 9 fbasgi! db (Weit 
265 6131’ 20 28 4A 9 fbnsgji ob ’«D’,cer,if 
266 0137’ 20 28 4B 29 fbasak! db ’(Kd',cr,1f 
267 6130’ 20 28 4C 9 fonsgl! db ’(UW’,er,if 
268 A" 20 28 AU 29 fbnsam: db "(M',er,it 
269 9149’ 20 28 dE 29 fbasgn: ob ’ (N’ ‚er, if 
270 @lAF' 20 28 4F 29 fbasgo: ab ’ (0° ,er,if 
271 0155’ 26 28 58 29 fbasgp: db ’ AP)’ ‚cr, if 
272 ONSk' 20 28 5A 29 & ' (2) weiter (w) wiederholen (X) ekit’,’ ’+Sh. 
273 
274 a0 2 23 5129 fonsgai db "(9° ‚cr, if 
275 H156’ 20 28 52 29 fbasgr: ab ’ dm’ ,cr,lf 
276 MSc’ 20 28 53 29 fünsgs: db ' (57° ‚cr, if 
a m192 20 28 54 29 fbasat: db * (7)? ‚en; if 
278 0198" 20 28 55 29 fbnsqu: db "(u cr, if 
279 01%’ 29 28 56 29 fonsavi db ’(W’ er, if 
zu HAM’ 20 28 59 29 fbmsgr: db "NM 
81 HA’ MD MA b.) cr,if 
282 MAC" 2 28 SA 29 & ’ (2) weıter (W} wiederhalen (I) elit‘,' '+Sön 
& 


29 902’ CA ers: 


[) ; Ende-Marke 
; Bildschira loeschen 


& dch, laht&%h ; Abschliessen nıt Bıt 7 gesetzt 


21l 
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21 

292 i 

293 ; Cursor ohne iosscnen nach Bılaschırm links ooen 

294 : 

235 

Zu K chome! cab iehtbin 

27 

298 ; 

299 ; Bilaschırm ab Cursorposition Ioeschen 

Bi] ; wenn Funktion nıcht vornangen (LRS-Sequenz verwenden 
3 ’ 

2 

33 9105’ 
364 


E03 cleos! ob ioh, 'Y'+oh 


36 ; Benutzerzeile - wırd nach dem Frogrammheader ausgegeben 
397 ; Muss at CR,LF engen, mıt 7. Bıt gesetzt 

Bu ; Wird dıe Zeile nıcht benutzt muss sıe mıt eıner @ 

309 ; abgeschlossen werten 

318 ; Der Text darf maximal 2 Zeılen umfassen 

3 n 

312 

213 0107 20 20 20 28 usrlin: db 2 mit Anpassung an gen NÜR-kleın-Computer’ 
314 0299’ 00 HA 3A db er,if,if+s@n 5 (2% lınefeed) 

315 

316 


212 
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317 
318 
319 
329 
321 
322 
323 
324 
325 
3265 
327 CH 


331 DOCH 
332 
333 KL 
334 Welt 
335 EL 
3% Hoch 
337 se 
383 u 
9 
349 
34] 
342 
343 
244 
45 
346 @2uC' C3 FRI 


367 

368 

369 020F' ED 43 02%’ 
370 213° 73 

371 9214’ 03 C4 

372 

373 

374 


5 KRREERKRKRRRIRRRRERRERRRREKKERUKRRRKRRRRRREKKRRRRKKRRKKRÄR TERN 
; % hardware-Anpassung an oen ünıversalfornatierer x 
} KERRIRRERRRSTRRRRREFRORRRRRERRRRKRRORRKERERRRRRRRRRERERRRRERFRT 


125333399959 9777 

; Vereinbarungen 

‚ kentakkkerkkkrrk 
focend equ Ach 
fictrk equ dcih 
fdcsec equ ach 
focdat equ sch 
fdcsel eq Acdh 
home  equ eo 1 O0 ; ohne step aber headlaad & verify 
sek equ 006111686 
reads equ 10001 1 &tı 
readıd oqu 110001000 
stepin equ A191 1 addo 
writetr equ 111191000 

i B335379375 9577797 

; CONIN 

> KRREREREEKIERRRE 
canin!  jp archan ; Bewusst MNIÜ ca nur fuer FüC2 anpasst! 

BENEETTERTERRTTN 

; Kontroller 

‚ trtarkkkerkicher 
dsksel: 


; Laufwerk ansprechen 

; Erhaelt vom Hauptprogramm Hauptprogramm in Register <B> 

; den SELECT - SIDESELECT - DISK (mını-maxi) und DENSITY nach 
; den Vorgabewerten in dıesem Programa. Es kann notwenaıg sein 
; die entsprechengen Daten erst hıer anzupassen, wenn z.B. 

; der Select auf andere Weise oder ueber verschiedene Ports 

‚ erfolgt. 

; Programm muss nit. TIME-QUT arbeiten. Falls Laufwerk nıcht 

; angesprochen werden kann (keine Diskette oder was immer 

ı muss in <A>=FF und NZ-Flag zurueckgekehrt werden. 


ld (step),bc ; Werte retten 
ld a,b ; SELECT 
out (fdesel),a ; und Laufwerk ansprechen 


; warten bis READY oder TIME-OUT 
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375 

376 

377 

378 

379 

ale 21 
3810213 08 CH 
322 0zie' E69 
333 #210' 8 
334 H2lE' 
385 02IF’ 20 Fü 
326 221’ 28 
327 0222’ TC 
3 0223 65 
389 0224 3% F3 
ra 
391 6227’ (9 
392 

393 

394 0228’ 

395 

3 

397 

39 

Aa 0228" 6 58 
aa za 1: 
4u2 

403 0226’ 
and 

4u5 

406 

447 

463 

49 AZ’ 6 
419 A2ZE' CO 0231’ 
all 

412 A221’ 

413 

414 

45 

416 

417 

418 A231’ DB Ca 
419 0233’ 3A 02%’ 
429 0235' 69 
421 9237 03 C6 
422 0239" DR CA 
423 028’ CB 77 
424 9230" 28 FA 
425 925’ 08 (9 
426 0241' E6 
427 9243’ C9 
48 

429 0244’ 

49 


431 
2 


© 
E32 
a 


214 


askl: 


gostep! 


restor: 


busy:! 


busyl: 


wrttrk: 


i 
; bei festverorantetem Reaay entspracnenge Delayschlaite 
+ (200. .Sööms) vorsenen, (sıehe Datennıatt ges Laufwerkes) 
; 


ld hi,» ; TIME-IT Scnieife 
in a,(facemd) 

and te ; Teste kEAur 

ret z ik 

det a 

jr nz,dsk2 ; warteinweiicnen-- 
ec hl 

ld a,h 

or 1 

jr nz, sk] : weıter . 

der a ‚ Aefr und N 

ret 


ld b,stepin 
jr busy 


; Home des Laufwerkskopfes 


ia b, home 
call  busy 


; pnysikalischer Zugriff fuer TYPE I Befehie 


in a, (fdccmd) ı reset moegl. INT 

1d a, (step) ‚ stepping-rate 

or b ; einfuegen 

out, (fdccmd),a Befehl ausgeben 

in a,(fdcsel) ; warten aut INT 

bit 6,a 

jr z,busyl 

in a,(facend) ; lese Status 

and 1a Ode ; Maskıere READY & RNF-SEER 
ret 


’ 
; Schreiben eines Tracks 
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483 
434 
435 
45 0244' 06 FA 
437 


48 

433 0246 

449 

44] 

442 

443 

444 

445 0246' 08 (9 
445 6243’ 3A 020 
447 0246’ E6 
443 9240' 17 

443 @24E' 17 

450 G24F' 17 

451 0259' 9 

452 9251’ 0E 13 
453 0253° 03 (8 
454 9255' 08 C4 
455 0257’ 07 

456 6253' 39 FB 
457 025° 08 CA 
453 9250’ CB 4F 
459 025E' 28 65 
469 9269" ED A3 
46] 8262" 03 25a’ 
462 

463 6265 CB 47 
464 0267' C2 9250’ 
465 Q26A' E6 E4 


475 

476 0260’ 03 02 
ATT OZEE' DER 
478 

473 a1’ 

459 


432 
483 

434 

485 0271" A 020" 
435 9274’ E6 80 
437 0276' 17 

433 9277' 17 

489 0278° 17 

4% 9279' Bl 


putdata: 


putal! 


putd2: 


put?! 


rdsec! 


getdata! 


; <HL) zeigt auf Puffer, Track ist eingestellt 


1d b,writetr 


; physikalischer Schreiozugriff 


in a,(foccma) Reset »oeglichen INT 


id a,(cursel) ; aus select 

and a, ; sıdeselect extrahieren 
rla ; und 

rla fuer Wu 1797 

rla ; side select in Bıt |] 
or b ; in Betehl eintuegen 
ld c,facaat ‚ Datenregıster 

out (foccm),a i ... und los gents 

in a,(facsel) ; warten bıs Kontroiier bereit 
rlca 

jr nc,putal 

in a,(fdeend) ; Status lesen 

bıt 1,a ; ung? 

jr z,putd3 ; wenn nıcht .. 

outi ‚ sonst Daten raus 

Jp puto2 ; und weiter gent's 

bıt 9,a ; noch BuSY? 

jp nz,putd2 3... Ja, sonst 

and "lad aeb ; Fenler maskieren 

ret 


lesen eines Sektors zu Testzwecken 
<HL> zeigt auf Putfer 


‘Mm Sektor 
out, (fdesec),a ; Sektorregister setzen 
ld c,reads 


; physikaliscnes Lesen 


ld a,(cursel) ı sso-Bıt fuer 

and I) ; W 1797 einfuegen 
rla 

rla 

rla 

or [4 ; sso-Bit einfuegen 
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451 827A' ee (3 
492 6270’ 03 (0 
433 @27E' 08 04 
434 5230' 97 

435 0281" 0 FR 
4% 

497 023° DB CA 
433 6285’ CB AF 
433 0287 CA BSP’ 
Sau YA’ ED AZ 
Sal B28C' 13 0283" 
562 

503 a2 Ch 47 
Sa4 42381’ (2 6233 
SaS 0234 E6K 
So 2 19 

57 

Ss 0297’ 

59 

BL) 

sti 

S12 

513 

Ss14 

SIS 8297 E44 
515 #299 03 C4 
Sı7 02’ (9 

513 

519 

Ss 

521 

522 

523 

524 

525 02% 
5% 020" 
527 

S2S 02x’ 
53 

53] 

532 

523 

534 


SE 


getal: 


getd2! 


geta}! 


ld c,fdcaat 

out (fcemd),a 

in a,(fgcsel ) 

rlca 

ir nc,getal 

ın a,(fdcend) 

bıt l,a 

IP z, 92103 

in. oe 
IP, getal 

bıt 2,a 

Ip nz,getd2 


mtarf: 


step: 
cursel: 


image! 


and eu I Iimo 


ld 2,0] duo 


out (facsel),a 
ret 


‚ Kkarkektrskikere 
; RAM-Bereich 
; khnockkkknnker 


EN 
== 


’ 
; ab dıesen Bereich wırd das Formatierungsimage aufgebaut, 


% Error(s) Detected. 676 PERB= Bytes. 


194 Symbols Detacted. 


216 


; Catenport 
; Befeni ausgeben 


D 


D 


; abwarten bıs 
rg? 


wenn nach nıcht 


; maskıeren 


Abschaiten nes Laufwerkmtors 
Falls nıcht natwenaıg mıt RET anschliessen 





ZEOASM SuperFast Relocating Macro Assembler 20 Dec 85 49:32 ZEMASM 1.24 Page 11 
Cross Reference: 


OS’ ADRIVE 92 

W008" BORIVE % 

07 BELL 7 

9231’ BUSY 41 49 42 
233° BUSY 42 44 

WB" CORIVE 109 

alud' CHömk Mm 2% 
9105’ CLEOS LU Ber) 
eld2' CLRS “u 2 
8260’ CÜNIN 4 246 

wel CR DDr >> Br ep 2) Be Du Ba Ba Ba Ye 


Ba a 2m a 272 275 
26 27 8 2a ze 2 314 


920° CURSEL Mb 45 52 

A094" DOENS 8 

WM: DORIVE 194 

9228° DOSTEP u 34 

MOOS’ DRVTAB aa 

19° DSKI a 8 

BIE" DK2 ET 

HOF" DSKSEL 34 

#11” EORIVE 19 

a2 FI024 1732 10 Zu 

Bob F123 179 218 

we 266 u 

@02 FS12 172 

1079" FENSE 8 2% 

9979” FERSCA 19 254 

BO" FENSER 194255 

BCT" FENSEL 256 

AM" FERSED 57 

MORE” FEMSGE 258 

DOFA" FENSEF 259 

AREA” FEMSER 2 

Bild" FERSEH 25] 

ANZB' FENSGL 264 

ANA" FERSSJ 25 

6137" FEMSEK 26 

BAD" FERSEL 87 

H143” FERNSEH 28 

A149" FENSEN 29 

BIAF" FENGEO 270 

ASS" FENSEP an 

B130” FENSER zu 

BIS6" FERSER 275 

Bläc’ FEnses 276 

M192" FENSET 27 

B198" FERSEU 278 

AISE" FENSEV 29 

HIMA” FENSEY 2 

Ca FOCCM) mr er 
437 

3 FOCDAT 2 

92 FOCSEC 39 4% 

BA FOCSEL Mr si 

MCI FOCTRK 328 

M14' FORIVE 112 

035° FORMI 1 
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al’ FÜRM2 194 

940° FÜRM3 204 

93 FRMLEN 214 215 

6035’ FRMTAB 39 175 24 

17" GÜRIVE 116 

H27E' GETD) 43 455 

283° 5ETü2 7 

Hr GET} 49 563 

9271" GETOATA 473 

al’ HÖRIVE 1 

RC KÖME 233 43 

HD’ TORIVE 124 

923e' IMAGE 42528 

FFFF JA I 2 % 5 15 15 1 
18 

092° JDRIVE 12 

23° KORIVE 122 

0025’ LÜRIVE 1% 

aA LF 7) Be Bu ee Ba) Be Be: 3 


Bw a 5 2m ZN 272 275 
26 m a el za 5 


0059’ MAKFRM 39 25 

BZ MAR an 

6423’ MÜRIVE 140 

al" MINI SM 

9297" WOTGFF u 5% 

@92C' NORIVE 144 

und NEIN Een [Bu 1.7 Bus Tue 1 Pr äueen D Tue PB Pe Pr 
132 18 1 14 13 152 85 26 208 

SF" OURIVE 145 

32" PORIVE 132 

9255’ PUTDI 454 456 

g2sA' PUTDZ 457 Anl Abd 

#265’ PUTD3 453 463 

0246‘ PUTDATA 439 

#260" RDSEC 4 4683 

WC4 READID 36 

WC REAOS 35 47 

O22C' RESTOR Lee 1 

0903’ SDENS an 

WC SEEK 334 

Wal SELA 3 93 

2 SELB s 9 

Wald SELL 66 161 

RR SELD 61 185 

Ma" SIOMSK 8 68 

02%" STEP %9 49 55 

53 STEPIN 337 400 

9107’ USRLIN 39 313 

Werd WRITETR 33 4% 

@244' WRTIRK 4 48 

H5A’ KLTIA |E) u F 7. Vz 73 

SH" XLTZA 2 212 224 


218 








